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FOREWORD 

— by Tim Hartnell 



The Commodore 64 is one of the most powerful personal 
computers on the market. It has the graphic capabilities of an 
arcade machine, the sound of an expensive music synthesiser, 
and expansion capabilities which make it ideal for many 
business applications. 

But you need a key to unlock the 64s possibilities, and I believe 
that Mark Greenshields gives you such a key with this exciting 
book. He takes you through BASIC programming on the 
Commodore 64, including demonstration programs at every 
turn to reinforce the information he is sharing, and to make the 
use of each command and function crystal clear. 

From there, you'll progress to assembly language (machine 
code) programming. By the time you've studied this section, 
you'll have gained a great deal of competence in this exciting 
area of programming. 

Mark shows you a number of easy ways to control sound, 
sprites, the high-resolution graphics and colour. 

It's time to get underway, so you too can learn to master the 
Commodore 64. 

Tim Hartnell, 
March 1983. 

Tim Hartnell is author of a number of personal computer books, 
including The Book of Listings' (BBC Publications), 'Getting 
Acquainted with Your Vic 20' (Interface Publications) and 'The 
Personal Computer Guide' (Virgin Books). 
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INTRODUCTION 



There are certain expressions which are frequently used in the 
book. They should be studied and understood before 
continuing with the book. 

VARIABLES 

A variable is a letter, series of letters or a letter and a number 
that stand for a number or a list of letters in a program. This is 
done to save time and memory and add flexibility. There are 
three types of variables: 

1 . A numeric variable. 

2. An integer variable. 

3. A string variable. 

They are all suffixed in different ways to distinguish them from 
each other. A numeric variable has no suffix: 

eg. 

a or z or a(1 ) or a4, etc. 

An integer variable is the same as a numeric variable except that 
it is suffixed with a '%' sign. Their use is primarily to save 
memory in preference to numeric variables. 

eg. 

a% or D% or a(1 )% or h7%, etc. 

A string variable is used to store 'strings' of letters or numbers. 
This makes text easy to handle. (It is suffixed, with an '$' (dollar 
sign). 

eg. 

A$ or f$ or A(1 )$ or h7$, etc. 
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MATHEMATICAL OPERATORS 

+ add 

- subtract 

* multiply 

/ divide 

| to the power of 

MASTERING THE COMMODORE 64 

The Commodore 64 uses a language called BASIC (Beginners 
All-purpose Symbolic Instruction Code) . It is the simplest of all 
languages to learn and use. However, it has a few drawbacks. 
Most of all it is slow. This book will try to explain how to speed 
up BASIC programs. 
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SECTION 1.1 



This section covers the whole of the BASIC language on the 
Commodore 64 and explains how sound and music synthesis, 
colour, high-resolution and sprites can be used on the 
Commodore 64. 

The commands are not presented in alphabetical order because 
it is far easier to learn them in this order. 

We will begin with the command PRINT. 

The command PRINT does exactly what it says. It prints 
characters on the screen, printer, disk drive or cassette. It has 
two basic formats: 

1) PRINT " "(quote signs). This puts what is inside the 
quotes onto the screen. 

2) PRINT A. This prints the value given to the variable A. If A 
has not been set then it will PRINT 0. 

When a variable is used after a quote then a semicolon (;) 
should be used. 

eg. PRINT "HELLO YOUR SCORE IS" ; SCORE 

Now that we can print variables on the screen we want to 
change them. This brings us to our next command, LET. The 
LET command is used to assign a (variable) to a number or 
string. The variable (numeric) can be assigned a number 
between: 

-1.70141183 E + 38 (times ten to the power of 38) to 
+ 1 .701 41 1 83 E + 38 for the largest floating point number, 
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and ± 2.93873588 E-39 for the smallest floating point 
number. 

The LET command allows you to add or subtract (or multiply 
or divide) one number from another. 

eg. 

LET A = A + 1 
LET A = A + B + C 

In every case the LET command can be omitted on the 
Commodore 64. 

eg. 

LET A = 1 is the same as A = 1 . 

So far, as soon as the computer has carried out your command 
it forgets all about it. To write a program we need a way of 
making the computer remember our commands. For this we 
assign line numbers to the commands. They are stored and 
carried out in ascending order. They can be in the range to 
63999. 

eg. 

10 PRINT "I COST" ; price "POUNDS" 
5 price = 350 

Commands with line numbers are referred to as progams. The 
above program would start with line 5. 

Once a program is written we need a way to start it. We do this 
with the command RUN. This command clears all previously 
set variables to zero (or strings to empty strings). It then 
executes the program from the first line number. It can also 
have a number after it. In the following case the program would 
start to execute from line 100. 

RUN 100 

100 PRINT "HELLO" 
110 PRINT "GOODBYE" 
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Once you are finished looking at your program you will want to 
stop it. This is done with the RUN/STOP key (at the left of the 
keyboard). If you accidentally press this key, you can re-start 
the program by typing the command CONT. This will only work 
if you don't change anything in the program. 

EDITING 

Now that you have written your first program you will want to 
change certain things. There is one new command and a few 
utilities which are in the Commodore 64 to help you. The 
command is LIST. It has four different formats: 

1 ) LIST Lists the whole program. 

2) LIST - 1 00 Lists the program up to and including line 

100. 

3) LIST 100- Lists the program from line 100 to the 

end. 

4) LIST 100-200 Lists the program from line 100 to line 

200. 

The LIST command puts the program lines onto the screen for 
you to see or change. 

There is an excellent editing facility on the Commodore 64. 
There are three special keys (and SHIFT) to help with editing. 
These are: 

1 ) CRSR (up and down). Move the cursor up or down the 
screen. 

2) CRSR (right and left). Move the cursor right and left. 

3) INST DEL. Inserts or deletes spaces into (or characters 
out) from a program. 

When editing you have three options: 

1 . Re-type the whole line. The new one will replace the old 
one. 

2. Get rid of the line completely by typing the line number 
and pressing RETURN. 

3. Use the cursor and correct the error. 
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If you are studying a program as it is running then it can be 
slowed down by pressing the CTRL key. 

Now that you have written a program you will probably want to 
store it for later use. For this you will need the 'C2N Datasette' 
or the floppy disk drive (see disk handling) . There is a command 
which stores a program on the cassette and this is SAVE. It has 
two main formats: 

1 . SAVE. Stores the program on tape without a name. 

2. SAVE "NAME". Stores the program on tape and names it 
'NAME'. 

When you press RETURN after typing this command you will 
be told to press record and play on tape. Do this and wait (have 
a tape in, of course). If the computer stops with 'OK. READY' 
then rewind the tape and type 'VERIFY'. Otherwise rewind the 
tape and re-SAVE the program. 

The command VERIFY checks the program on the tape to see if 
it is the same as that which is in the computer's memory. If all is 
OK then it will say so. If not re-SAVE the program. 

Once the program is on tape you will want to retrieve it at some 
time. The command LOAD does just that. It has two basic 
formats which are just like those of SAVE. They are: 

1 . LOAD. This loads the first program on the tape, and 

2. LOAD "NAME". This loads the program named 'NAME' 
whether or not it is the first program on the tape. If the program 
LOADs properly then it will say 'OK' . If you get a load error then 
try again. 

NOTE 

Try to keep the tape recorder at least two feet away from the 
TV. This will help successful SAVing and LOADing. Keep your 
cassettes away from the TV! 

It is a good idea to save each program twice on the tape and use 
computer quality C12 cassettes for more reliable storage. 
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There is a short cut to typing 'LOAD' to load a program. Press 
SHIFT and without taking your finger off press RUN/STOP. 
The program will now automatically load and run. 

Often in a program the user is required to enter some 
information into the computer. There are two commands 
which deal with this. The first of these is I N PUT, which has two 
formats: 

1. INPUT A$ or INPUT A (for strings or numbers 
respectively) . 

2. INPUT "ENTER YOUR NAME" ; A$ or INPUT "ENTER 
YOUR AGE" ; A. 

The second format works in exactly the same way as the first 
except that it PR I NTs information before asking for information 
(with a question mark). 

The INPUT command assigns values or strings to the variables 
just like the LET command only it allows the variable to be 
changed while a program is running. A skill level in a game is an 
example. 



NOTE 

Don't use more than 38 characters in the quotes because if you 
do the information will also be accepted by the variable giving 
bad data. 

When you have finished with a program you are likely to want 
to get rid of it from the computer's memory. Instead of 
switching the computer off you can type the command 'NEW. 
It clears the program from memory and sets all variables to zero. 
Once a program has been NEWed it is lost, unless it has been 
SAVEd on tape or disk. 

If you want to clear the variables but leave the program intact 
you type 'CLR'. 
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The other command for inputting information is GET A$. 
Unlike INPUT it only accepts one letter or number at a time and 
it cannot print text. Its principal use is where options are given 
and you are asked to choose A,B,C,D,E or F, for example. In 
the following program the computer asks for a letter or number. 
It will then print what you press. 



18 GETfH 
20 PRINTA* 
30 RUN 



SCREEN COMMANDS 

The cursor can be moved around the screen, coloured one of 
16 colours or reversed with special PRINT commands. To use 
them you just 'PRINT "' and then the relevant command/s like 
this. 

All the commands are listed below with their meanings. 



PRINT" s_ IS CLEAR SCREEN" 

10 PRINT" S_ IS HOME CURSOR" 

20 PRINT" e>IS BLACK" 

30 PRINT" E_ IS WHITE" 

40 PRINT" £ IS RED" 

50 PRINT" DL IS CYAN" 

60 PRINT" _ IS PURPLE" 

70 PRINT" 1_ IS GREEN" 

80 PRINT" ±_ IS BLUE" 

90 PRINT" il IS YELLOW" 

100 PRINT"a_ IS ORANGE" 

110 PRINT"u_ IS BROWN" 

120 PRINT"!,!. IS LIGHT RED" 

130 PRINT"w_ IS GREY 1" 

140 PRINT"jl IS GREY 2" 

150 PRINT"^ IS LIGHT GREEN" 

160 PRINT"z_ IS LIGHT BLUE" 

170 PRINT"J_ IS GREY 3" 
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180 PRINT"B. IS RUS ON" 
190 PRINt"r_ IS RUS OFF" 
200 PR I NT "Q. IS CURSOR DOWN" 
210 PRINTsL IS CURSOR UP" 
220 PRINT "L IS CURSOR LEFT" 
230 PRINT " A IS CURSOR RIGHT" 



The colours zero to seven are obtained by pressing CTRL and a 
key numbered 1 to 7. The colours eight to 15 are obtained by 
pressing the Commode key (C = ) and any number from 1 to 8. 

The cursor commands are obtained with the cursor keys at the 
bottom right of the keyboard. 

Reversed characters are turned on by pressing CTRLand9, and 
they are turned off with CTRL 0. 

When you are writing a program it is likely that you will want to 
know how much free memory you have left. The command for 
this is PRINT FRE (X). This command will only work if you have 
less than 32K of memory left. So to make this just POKE 52,0: 
POKE 56, 1 36. This gives you seven less K but if you need them 
then type 52,160: POKE 56,160. The memory is measured in 
bytes. A byte is one character. So if you have 1024 bytes left 
you can have 1 024 characters more in your program. 

The Commodore 64 has an ASCII character set which controls 
everything from colour and cursor controls to printer 
commands. They are accessed with the command PRINT 
CHR$ (ASCII code). 

eg. 

PRINT CHR$ (147) clears the screen. For a complete list of 
the CHR$ codes see Appendix 1 1 . 

There is a complementary command to CHR$. It returns the 
value for the character. It is ASC( character ). If it is a single 
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character then the format is PRINT AS C( "character"). If it is a 
string then the format is PRINT ASC(A$). 

eg. 

PRINT ASCC'A") gives 65. 

STRING HANDLING COMMANDS 

A string can be divided up for various purposes. There are three 
commands that do this: 

LEFT$ (string name, number of letters) 

RIGHT$ (string name, number of letters) 

MID$ (string name, starting position, number of letters). 
LEFT$ takes a set number of characters from the left side of the 
string. 

A$ = "ABCDEFGHIJK" 
PRINT LEFT$(A$,2) PRINTs AB 

RIGHT$(A$,3) takes the rightmost characters which in this 
case is UK. 

MID$(A$,3,4) takes characters from the middle starting at 
position three which in this case is CDEF. These commands are 
very powerful and allow complex string slicing to take place. 

The length of a string can be found with the LEN(A$) 
statement: 

eg. 

PRINT LEN (A$) 

Which in this case will print 1 1 . The numerical value of a string 
can be found with VAL(A$). It is only useful for numeric 
(totally) strings as letters return a zero value. There is a 
command which returns the numerical value of a string or 
argument. It is STR$. 

eg. 

PRINT STR$(12|22) PRINTS 144 
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In a program you will often want to know what a certain part of 
a program does. There is a command which caters for this. 
When the computer meets this command it ignores what 
comes after the command and goes immediately to the next 
line. The command is REM. 

eg. 

10 PRINT CHRS(147) 

20 REM LINE 10 CLEARS THE SCREEN 

30 REM HELLO *1 234567890 ETC. 

More than one command can be put on one line. They are 
separated by the colon (:). It is then just as if there was a new 
line, only it is on the same one. 

eg. 

10 PRINT "HELLO" :REM PRINTS HELLO 

When a program eventually comes to the end you usually want 
to start it again . One way is to have the last line as R UN . There is 
a better way to do this which preserves variables, GOTO line 
number. 

eg. 

10 PRINT*'THE COMMODORE 64" 
20 GOTO 10 

There is a command that allows you to go to a subroutine or 
routine outside the main program. It is GOSUB. When you 
have GOSUBed from a program you have to return to it. The 
command RETURN does just that. It returns to the command 
after the one you just left. 

eg. 

18 print's; 

20 pr i nt "commodore 64" 

30 GOSUB60 

40 PR I NT "COMPUTER" 

50 GOTO20 

60 PRINT"SjlTHE" 

70 RETURN 
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It works just like GOTO except that it must be returned from. 

A program can be stopped by other methods than pressing the 
STOP key. There are two commands which do this. The first of 
these is END. END stops a program when encountered but it 
cannot be re-started unless RUN or GOTO is used. Its main use 
is logically to end a program. 

The second of these commands is STOP. This command 
functions in much the same way as END except that the 
program can be continued by typing CONT. This command is 
used principally in debugging programs. 

The following two programs are the same except that in 
Program Two, the program can be continued. 

1 PR I NT "THE COMMODORE 64" 

2 END 

3 G0T01 

1 PR I NT "THE COMMODORE 64" 

2 STOP 

3 G0T01 

In a program there is often a situation where results depend on 
the value of a number, for example. 

eg. 

IF a number equals 1 THEN do command. 

The IF command checks to see if an expression is true. IF it is, 
THEN the computer does what is after the THEN. If the 
statement is false THEN the computer goes to the next line. 

10 A=l 

20 IFfi=12THENGOSUB100 

30 A=f>+1 

40 PRINTA 
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50 GOTO20 

100 PR I NT "THE STATEMENT IS TRUE 
110 A=l: RETURN 



Now we have come upon a problem. The program is running 
too fast to see clearly. This brings us to our next command 
(well, three). 

In the above example we needed to introduce a delay, ie. we 
wanted the computer to do something for a short time. On the 
Commodore 64 (or most other computers for that matter) we 
get it to count from one number to another before continuing. 
The FOR NEXT loop is what we use. It has the syntax: 

'FOR' variable = First number TO' second number 'STEP' 
what to go up or down by. 

The STEP tells the computer whether it has to count in ones or 
halves, for example. The step can be any positive or negative 
whole or decimal fraction. 

The FOR TO STEP loop would only carry out the first part of the 
statement unless we told it to loop back and do the NEXT one 
and the NEXT. 

eg. 

This program gets the computer to count from one to 100 
and print it in the top left screen position. As in this program if 
the step is one (only up) then it can be omitted. 

10 FORA=1TO100:REM START LOOP 

20 PRINT"SJ';A:REM PRINT NUMBER 

30 NEXT A: REM SO BACK AND DO AGAIN UNTIL 

A = 100 

The variables can be omitted from the NEXT statement, but it is 
advisable to leave them in as it makes programs easier to 
understand. FOR NEXT loops (as they are known) can be 
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nested (one or more inside another) but they must be in the 
correct order. The innermost loop is completed before any of 
the rest. In the following example the loops are NEXTed. The 
'C loop completely executes before the 'B' or the 'A' loop. The 
'C loop executes fully for every part of the 'B' loop and 20 times 
for every part of the 'A' loop. 

10 FORA=0TO20 

20 PRINT"A=";A 

30 FORB=30TO0STEP-1 

40 PRINT"B=";B 

50 FORC=200TO250STEP1 .5 

60 PRINT"C=";C 

70 NEXTC,B,A:REM DO C THEN B THEN A 

Sometimes during a game you want to introduce a random 
situation into a game, for example. There is a BASIC command 
which creates a random number. It is RND and it has the 
syntax: A = RND (1 ). The one in brackets can beany numeric; 
it does not alter the value of the random number. 

The RND function creates a number between and 
0.99999999. However, these numbers are not always in the 
range that we want. If we want a number between zero and six 
we need to multiply the random number by six: 

A= RND(1 ) *6. 

But wait. . .we can only get numbers between and 5.99994. 
We need to add a new command to help us. It is INT. INT 
returns the integer value of a number (the whole number). 

eg. 

PRINT INT (5.9999) is five (it just ignores what is after the 
decimal point). 

So to get a random number between one and six we need to use 
the following: 

PRINT INT ( RND(1) *6) + 1 
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The syntax for this is: 

A = INT(RNDd)* upper limit + lower limit 

The Commodore 64 has two inbuilt time clocks. One which 
counts in seconds, minutes and hours and one which counts in 
sixtieths of a second. They are accessed by the statements: 

TIME$ is the hours, minutes and seconds clock. 
Tl is the sixtieth of a second clock. 

To reset the clock type: Tl$ = "000000". This resets both the Tl 
and Tl$ clocks. 

Often in a program you will come across a need for numeric or 
string data. This will need to be read from somewhere (just as 
you would read your 'data' from a book). The commands that 
do this are: 

READ (a string or numeric variable). 
DATA (the actual data to be read). 

The following example takes a number from the DATA and 
multiplies it with A. 

10 PRINT"sJ' 
20 A = 12 
30 FORC=0TO12 
40 READB 
50 PRINTAxB 
60 NEXTC 

70 DATA 0,1,2,3,4,5,6,7,8,9,10,11,12 

If the DATA is to be read again it must be freed from the 
computer. The command is RESTORE. It stands by itself: 

100 RESTORE 

If subscripted variables are to be used then space must be 
allocated to them in the computer's memory. The comand that 
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does this is DIM. It has the syntax: 

DIM variable (number of numbers -Da string, numeric or 
subscripted variable. 

The number of divisions inside the brackets is limitless, but DIM 
statements are 'memory greedy' so just because you have 40K 
(for BASIC) at your disposal you can still run out of memory if 
you use too large a number! 

DIM A (999) is OK and so is DIM A (1,1,1,1,1,1,1,1,1,1) but 
DIM A(9999) or DIM A(1, 1,1, 1,1, 1,1, 1,1, 1,1, 1,1, 1,1, 1,1,1) 
are too big . You can only DIMension an array (list of numbers or 
letters) once so put these at the beginning of the program. If 
you re-DIM an array you will get an 'RE DIM'd ARRAY ERROR'. 

A subscripted variable is one that has a number in brackets after 
it. 

eg. 

A(12)or A(12,12,12), etc 

The use of a subscripted variable is mainly in adventure games 
or in programs with a lot of information which is released 
depending on the value of one variable or result of a calculation. 

In mathematical calculations it is often necessary to evaluate 
complex equations frequently. They are usually long and 
memory consuming. Why not create the function and call it as 
it is needed. To define the function we use the DEF FN 
command. To call it we use the FN command. The FN of each 
has a variable after it to tell the computer which function to call. 

eg. 

5 A = 12 

10 DEFFN^CX3«CAxC12t2DD 
20 PRINTFNXCAD 
30 A=A*2:GOTO20 
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The syntax is: 

DEF FN variable (X) = (X expression) 
and A = FN variable (x) or number 

The Commodore 64 comes equipped with trigonometric and 
scientific statements: 

SIN (X) 
COS (X) 
TAN (X) 

They all give the value of X where X is an angle measured in 
radians. A radian is 57.29577 degrees. So, to calculate the 
value of X when X is in degrees use the following formula: 

SIN (degrees/57.2957795) 
or COS or TAN. 

eg. 

FIND the SIN of 30.... 
PRINT SIN (30/57,2957795) 

The answer is .5 which is correct. The same formula applies for 
COS and TAN as well. 

When finding the inverse, ie. going from the value of X to X, 
you multiply by 57.2957795 to get the degrees. There is only 
one inverse trigonometric function and that is ATN. 

eg. 

If the value of X is .5, what is X? 
PRINT ATN (.5 * 57.2957795) 
Answer 26.5650512 

Although the Commodore 64 does not have the inverse SIN 
and COSINE they can be calculated using the following 
equations: 

INVERSE SINE = ATN(X/SQR( - X*X + 1 ) in radians or 
INVERSE SINE = ATN(X/SQR( -X*X+ 1 )* 57.2957795 in 
degrees. 
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INVERSE COSINE = X - ATN(X/SQR( -X*X+ 1 )) + n/2 
in radians or 

INVERSE COSINE = ZZZZ(-ATN(X/SQR(-X*X + 1 )) + n 
/2)*57. 2957795 in degrees 

But now we see the SQR function. What does it mean? Well, it 
calculates the square root of a number. 

eg. 

PRINT SQR (81) 
Answer 9 

The number in the brackets must be greater than or equal to 
zero. 

Often in maths you just want the answer to a question — you 
don't want to know its sign. There is a BASIC command which 
deals with this. It is ABS. 

eg. 

PRINT ABS(-999) gives 999 but PRINT ABS(999) also 
gives 999. 

If you just want to know the sign but not the answer, the 
statement SGN tells you this. 

eg. 

PRINTSGN(- 999) gives -1 but PRINT SGN (999) gives 1 . 

The result will be one if the answer is positive, minus one if 
negative and zero if zero. 

The LOG of a number can be calculated with the LOG 
statement. It is the natural log. To convert to LOG base 10 
simply divide by LOG(10). To get the inverse of the LOG you 
use EXP. This takes the log of the number and puts the 
mathematical constant e (2.71827183) to the power of the 
LOG. 
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eg. 

PRINT LOG (999) 

Answer 6.90675478 

PRINT EXP (6.90675478) 

Answer 998.79325 which is rounded up to 999. 

Instead of using cursor commands (in quotes) you can use a 
faster and more memory economic method with the two 
commands, TAB and SPC. These commands are used in 
conjunction with the PRINT command. The TAB command 
moves the cursor to the column specified. 

eg. 

PRINT TAB(12) moves the cursor to column 12. 

SPC moves the cursor a number of spaces forward, 
eg. 

PRINT SPC(12) moves the cursor 12 spaces forward. 

Both perform the same function except that when SPC is used 
after TAB the cursor does not move to the next line but X 
spaces forward. 

The position of the cursor (column) can be found by the 
command POS. 

eg. 

PRINT POS (X) 
result 22. 

The character in the brackets can be any printable one letter or 
numeral. It only works in program mode or after a cursor 
command or control character(s). 

There are situations in programs where binary comparisons 
need to be made. A binary number is a number which can be 
one or zero. In the Commodore 64 or any other computer with 
an '8 bit' microprocessor, the maximum number is 255 which is 
11111111 in binary. In binary a one stands for on and a zero 
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stands for off. To change a decimal number to binary or vice 
versa use the following table. If a one is in the box below a 
number, then add that number to the total. 



128 64 32 16 8 4 2 1 DECIMAL 
| | | | | | | | BINARY 
10 10 10 1= 165 



The main use of binary comparisons is in machine code where 
there are no 'greater than' or 'less than' commands. It is also 
used in character designing. See their respective sections for 
more information. There are three binary comparison 
commands in BASIC. They are AND OR and NOT. 

They all add two binary numbers together and depending on 
which command is used the answer appears. 

With AND there must be a one in both boxes for a one to be put 
into the third. 

10 110 111 183 
AND1 1 1 1 1 248 

1 1 1 176 

The other command for binary comparison is OR. It functions 
like AND except that if a one is in either box then a one is put in 
the third. 

10 110 111 183 
OR 1 1 1 1 1 248 

1 1 1 1 1 1 1 1 255" 

The statement NOT is used where you want the program to do 
something if the answer is false. 
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eg. 
P = 1 



p = p-1: IF NOT P THEN 100 

The program will branch to line 1 00 if P is not equal to 1 . AND, 
OR and NOT can also be used in IF THEN statements such as: 

IF A = 1 AND B = 2THEN100. If andonlyif A= 1 and B = 2 
then GOTO line 100. 

IF A = 1 OR B = 2 THEN 100. If A=1 or B =2 then GOTO 
line 100. 

IF NOT THEN 100. IF A = then GOTO line 100. 

FILES AND TAPE/DISK/PRINTER USAGE 

All these commands will be fully explained in the printer and 
data file sections. But here is a short summary. The command, 
OPEN tells the computer to send the data to other devices 
except the screen. However, it only opens the way. Other 
commands need to be used to actually move the data. It 
requires one, two or three operators. 

The devices that can be 'OPENED' are: 

DEVICE DEVICE NUMBER 

Keyboard 
Cassette 1 
RS 232 2 
Screen 3 
Printer 4 

Printer 5 (depending on switch on printer) 
Disk drive 8 
Serial bus4-127 

Serial bus 128-255 (if after carriage return) 

It has the syntax: 
OPEN device no, command f , string. 
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The command ' # ' is used to tell the computer which mode to 
put the OPEN into. 



DEVICE COMMAND f 

Cassette 
Cassette 1 
Cassette 2 

Disk 1-14 
Disk 15 
Keyboard 1 -255 
Screen 1 -255 
Printer 
Printer 7 

eg. 

OPEN 1,0 

OPEN 1,1, 0,"name" 



EFFECT 

Read tape file. 
Write tape file. 
Write tape file with end of 
tape marker at end of file. 
Open data channel. 
Open command channel. 
No effect. 
No effect. 

Upper case/graphics mode. 
Upper lower case. 



Read the keyboard. 
Read from cassette. 



After a device has been opened and when its use is over, the 
computer must be told . The CLOS E command does this. It has 
the same syntax as the OPEN command. So if you OPEN 1,1,1 
then you must CLOSE 1,1,1. 

Note: don't open a file more than once without closing it first. 

If total control is to be made by the device, eg. listing a program 
onto the printer, then the CMD command must be used. The 
numbers are as follows: 

CMD DEVICE NUMBER 

Printer 4 or 5 
Disk 8 
Screen 3 
Keyboard 
Cassette 1 
RS 232 2 
Serial bus4-255 
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When the device has finished being used it must be C LOS Ed by 
the following method: PRINT f device no: CLOSE device no. 

eg. 

OPEN 4,4:CMD 4:PRINT"HELLO";:PRINT f 4:CLOSE 4 

This prints 'HELLO' on the printer and properly closes the 
channel to the printer and sends control to the screen. 

IF a file has been OPENed then it can have information printed 
on it or data inputed from it. 

The printing command is PRINT f . It has the syntax: 
PRINT f device no, data. 

The data can be in quotes or variables just like the normal PRINT 
command. When you have finished you must CLOSEthe same 
file that you OPENED. 

Information can be PRINT fed onto any device except the 
keyboard. 

The inputing command is INPUT f . 

If a file has been OPENed then information can be INPUT fed 
from it. 

It has the syntax: 
INPUT f device no, data. 

The data can be variables or text enclosed in quotes. 

When you are finished you must CLOSE the file that you 
OPENED. 

Information can be INPUT fed from any device except the 
screen or the printer. Instead of INPUT there is another 
command as in normal BASIC: 
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GET# 



Like in normal BASIC, GET # acts just like GET by getting one 
bit of data at a time (one variable or letter). 

It has the syntax: 

GET # device no, variable (string or normal). 

As with PRINT f and INPUT #, GETf must also have the 
channel CLOSED when finished with. 

There is a statement which retu rns the device number of the last 
device to be used. It is STATUS. 

eg. 

PRINT STATUS 

ex. result. 16.... read error. 

In a program where there are lots of possible subroutines which 
can be used, depending on the result of a calculation, for 
example. 

Instead of lots of IF THEN statements we can use an ON GOTO 
or ON GOSUB command. If the value of the statement is one 
then the program branches to the first line number in the list, if 
two then it branches to the second. If the value is less than one 
or greater than the number of line numbers in the list then the 
computer goes to the next line of the program (or the next 
command after the colon). 

eg. 

10 A = l 

20 ON A GOSUB 100,110,120,130 

30 A=A+1 

40 GOTO20 

100 PRINT"A=";A 

105 RETURN 

110 PRINT"A=";A 

115 RETURN 
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120 print"A=";a 

125 RETURN 

130 PR I NT "LAST IN LIST" ; A: END 

Numbers greater than one can be used by using equations as in 
the following example. 

10 A=.5: A=A*2 

20 ON A GOSUB 100,110,120,130 

30 A=A*2 

40 GOTO20 

100 PRINT"A=";A 

105 RETURN 

110 PRINT"A=";A 

115 RETURN 

120 PRINT"A=";A 

125 RETURN 

130 PR I NT "LAST IN LIST"; A: END 



MEMORY CHANGING 

These are the most powerful set of commands that the 
Commodore 64 (or any other computer) possess. They allow 
machine code to be entered and executed, they can control 
sound, etc, and they can totally change the computer's 
behaviour. 

The first of these commands is POKE. It has the syntax: 
POKE address, number (between and 255) 

There are some addresses which cannot be POKEd. These are 
called ROM. The BASIC interpreter and the character set and 
the operating system are stored there. All other locations may 
be POKEd. 

POKEing a memory address puts a number into that address 
and in certain addresses control colour, sound, sprites, high 



37 



resolution, etc. An address is a location in memory which is 
unique to any other. They cannot ever change. The values 
contained in some of them, however, can. Think of a memory 
address as a letter box that is only big enough for one letter. But 
that letter can be between zero and 255 units in size. To put 
another letter into that letterbox you must remove the old one. 
This is what POKEing does. It acts like the postman. Only it 
takes a letter away for every new one it delivers. 

The addresses that can be POKEd are between zero and 65535. 
However, addresses between 40960 and 491 51 and 57344 and 
65535 cannot be POKEd. The character ROM is also 
unPOKEable and it is between locations 53248 and 57344. 
(This is paged so these locations can be POKEd. See the 
section on programmable characters). POKE can be used with 
variables as well as numbers. 

eg. 

POKE 2040, 13 : 
POKE A , B 



WARNING 

Make sure the variable A in the example above is always set as 
POKEing into location zero can cause a crash (never ending 
loops that you can not stop) . The only way to recover from one 
is to turn the power off and on again . . . losing your program. 

POKE has a complimentary command. It is PEEK. PEEK returns 
the value contained in a memory address or location. All 
addresses from zero to 65535 can be PEEKed. PEEK does not 
alter the contents of the address. It can also be used with 
numbers or variables. 

eg. 

A = PEEK(65535):PRINTA 

result 255 

PRINT PEEK(0) 
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result 47 

IF PEEK ( 1 060 ) = 21 THEN 1 00. If location 1 060 contains 2 1 
then goto 1 00 

There is a command that waits for a location to contain a 
specific value. It is WAIT. It has two syntaxes: 

1 . WAIT address, variable 

2. WAIT address, variable 1 , variable 2 

It is not a command that should be used unless you are an 
experienced programmer, as you could get into a loop that you 
cannot get out of. It is mainly used in input/output operations. 
However, one good use for WAIT is for waiting for the user to 
press a key. To do this more effectively make a line of your 
program: 

POKE 198,0: WAIT 198, 1 

The program will wait until you press a key and then carry on 
with the next line. 

The way that the WAIT command works is that it takes the 
value in the memory address and ANDs it with variable one. 
Then it exclusive ORs (see the machine code section) the 
number left with variable two. This sounds and is complex but 
just think of it as a filter which when clear waits until the clear 
value changes. 

Machine code is entered into memory by means of the POKE 
command. However, we need a method of starting the 
machine code. There are two ways: 

SYS(x) This command 'runs' the machine codef rom address 

x. 

USR(x) This command runs a machine code subroutine from 
the addresses stored in addresses 784 and 785 and passes the 
value of x to the machine code program. SYS is far more 
powerful and is easier to use. For a fuller explanation see the 
machine code section of the book. 
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SECTION 1.2 



COLOUR 

The Commodore 64 has 1 6 colours at its disposal. They can be 
used for the border, the screen, characters, high resolution 
graphics and sprites. The normal colour resolution (smallest 
individually colourable spot) on the screen is limited to 40 * 25 
(the same as the characters). This section shows only this low 
resolution as the high resolution will be covered in the section: 
sprites, high resolution and programmable characters as they 
allow more colours per unit. 

First, we deal with the border and screen colours: 

The screen and border colours are controlled separately by the 
POKE command. They are both in the range to 15. See the 
table below. 

The border is controlled by the location 53280. When the 
computer is switched on the normal value in this location is 
254. 

eg. 

To change the border to black: POKE 53280,0 

The screen is controlled by location 53281 . When the 
computer is switched on or reset, the normal value in this 
location is 246. 

eg. 

To change the screen to red: POKE 53281 ,2 
These registers can only show 16 colours but can be POKEd 



41 



and PEEKed up to 255. To make sure that the right colour is 
POKEd or PEEKed it is advisable to put AND 15 after the 
statement. This filters out excess numbers and gives the true 
colour. 

eg. 

POKE 53281 ,2 AND 15 for a red screen 

PRINT PEEK (53281 ) AND 1 5 to PEEK the screen. 

Characters can be one of 16 colours (as shown in the table). 
There are three ways of accessing these colours. 

1 . They are available directly from the keyboard by using the 
CTRL key (C = ) key and the number keys 1 to 8. Using the 
CTRL key the colours on the front of the number keys can be 
accessed. Using the Commodore key and the numbers 1 to 8 
the second set of colours are accessed. These are shown in the 
table below. These colour commands can be used in programs 
by putting them in PRINT statements and they will change the 
colour of the text following them. They appear in a listing as 
special symbols. 

5 POKE53281,0:POKE53280,.2:REM BLACK SCRE 

EN AND RED BORDER 

10 PRINT"EHELLO" ".REM WHITE 

20 PRINT"£Y0U1L sREM RED THEN GREEN 

25 FORREST =0TO200: NEXTREST 

30 GOTO 10 

2. The CHR$(x) statement also changes colours. It is used in 
conjunction with the PRINT command. 

eg. 

PRINT CHR$(5);"HELLO";:PRINT CHR$(144)"YOU" 
The colours along with their values are in the table. 

3. There is a register (location) that contains the current 
cursor colour (colour printing in at the moment) and it can be 
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POKEd to change colours. It is location 646. It can be POKEd 
with the values to 1 5 as shown in the table ( 1 6-255 will work 
but only repeat to 1 5). This is the most efficient method for 
changing colour. It is also the fastest. 

eg. To print out bars of every colour. 

10 FORA=0TO15 
20 P0KE646,A 
30 PRINT"S_ 
40 NEXTA 

If you are having trouble getting good colours on your TV use 
this program to tune it with. The colours should all be crisp and 
clear. 



44 



SECTION 1.3 



ANIMATION 

Animation is the movement of characters on the screen, 
principally for use in games. 

As the screen on the Commodore 64 has 40 characters across 
by 25 characters down, there are 1 000 screen locations. The 
screen is permanently memory mapped (stored in memory) and 
takes up 1 ,000 bytes of memory. It is stored from locations 
1 024, to 2023 inclusive. See the table at end of the section. 

There are two ways of producing animation in BASIC. One is 
using TAB, SPC and the cursor controls but this method is 
slow and pretty useless so I will not waste time on it. The 
second, far better method is POKEing to the screen. To put a 
character onto the screen you POKE the location you want it to 
appear in with its code from Appendix 2. For example, POKE 
1024,1: puts an A in the top left of the screen. Clear the screen 
and try it. There it is ... or is it??? Yes, it is there, but you can't 
see it as it has no colour. 

There is a similar part of memory to the screen which is set aside 
for the colour on the screen. You POKE each location (or the 
ones you want) with a colour code from to 1 5. But remember 
you can only see characters which are not the same as the 
screen colour. This 'screen' is stored from locations 55296 to 
56295 inclusive. See the table at end of the section. 

To colour the A you POKEd into 1024, type POKE 55296,1 (or 
any colour you want) . The A should now be displayed in white. 
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The colour map is laid out exactly the same as the character map 
(screen) except that it is 54272 locations further on. The easiest 
method to colour a character that you have POKEd onto the 
screen is to do the following: 

POKE location , character : POKE location + 54272 , colour 

To find out what character is on the screen or what colour it is 
we use the PEEK( ) statement. 

eg. 

PRINT PEEK (1024) 

If the A was still in 1024 then 1 would be PRINTed, otherwise 
32 would be returned (32 is the code for a space) . If we PEEKed 
the colour it would give 1 . 

eg. 

PRINT PEEK (55296) or PRINT PEEK (1024 + 54272) 

The answer should be 1. The following short game 
demonstrates the use of POKEing and PEEKing the screen. 

Use the M key to move right and the Z key to move left. You 
have to dodge the asteroids (full stops) and ram the oncoming 
ships (A). Good luck. 



5 PRINT"sl 

10 P0KE53281 ,0:POKE53280,0:FORA=0TO24:PR 
INT:NEXT:B=1504:C=20 

20 A=RNDC 1 D*40s P0KE1984+A ,46: PQKE1984+A+ 
54272, RNDCC1 ]xl4D+l 

25 IFRNDC1 D> „7THENP=RNDC 1 ]*40: POKEP+1984 
,l:POKEP+1984+54272,7 

30 GETA*: IFf=lt = "Z"ANDC>0THENPOKEB+C ,32: C = 
C-l 

35 IFA$ = , 'M"ANDC<40THENPOKEB+C,32:C=C+1 
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40 P0KEB+C,32 
50 PRINT 

60 IFPEEKCB+CD=46THEN120 
70 IFPEEKCB+CD=1THENGOSUB200 
90 P0KEB+C,22:P0KEB+C+54272,9 
100 GOTO20 

120 PRINT"sJ':P0KE53281 ,2:PRINT"V0U HIT A 
N ASTEROID" 

125 PRINT" YOU SCORED " ; S; "POINTS" : S=0 

130 PRINT'DO YOU WANT TO TRY AGAIN?" 

140 GETA*: IFA*="Y"ORA* ="N"THEN150 

145 GOTO140 

150 IFA$="N"THENEND 

160 IFA$="Y"THENRUN 

200 FORA=0TO16: POKE53280 ,A: NEXT: S=S+10: R 
ETURN 



As you can see from the program (lines 30-50) before you 
move you must erase your last position. This is achieved by 
POKEing a 32 (space) onto your position and then moving. 

eg. 

POKE location, 32 :move character: POKE location , 
character. 

If you feel easier by positioning characters on the screen in 
columns and rows, you can still POKE to the screen using co- 
ordinates using the following formula: 

POKE 1024 + column + (40 * row) , character 
(Columns are from zero to 39 and rows from to 24.) 

Use the same 'X and Y co-ordinate method for the colour, 
replacing 1024 with 55296. Then to move, update row and 
column variables respectively. 

Below are the screen and colour maps for the Commodore 64 . 
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SCREEN MEMORY MAP 



COLUMN 

20 



1024- 

1064 

1104 

1144 

1184 

1224 

1264 

1304 

1344 

1384 

1424 

1464 

1504 

1544 

1584 

1624 

1664 

1104 

1744 

1784 

1824 

1164 

1904 

1941 

1984 



1063 
I 



I- 
2023 



COLOUR MEMORY MAP 



COLUMN 

20 



55335 
t 



55296- 

55336 

55376 

55416 

55456 

55496 

55536 

55576 

55616 

55656 

55696 

55736 

55776 

55816 

55856 

558% 

55936 

55976 

56016 

56056 

56096 

56136 

56176 

56216 

56256 



56295 
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The values to POKE into the above colour locations are as 
follows: 



BLACK 
2 RED 
4 PURPLE 
6 BLUE 
8 ORANGE 
10 LIGHT RED 
12 GREY 2 
14 LIGHT BLUE 



I WHITE 
3 CYAN 
5 GREEN 

7 YELLOW 
9 BROWN 

II GREY 1 

13 LIGHT GREEN 
15 GREY 3 



For example, to make the colour of location 1 024 (left-hand top 
corner of the screen) yellow type POKE 55296,7. 
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SECTION 1.4 



MUSIC AND SOUND SYNTHESIS 

The sou nd output from the Commodore 64 is the best from any 
computer I have ever heard. You can totally control the 
individual 'voices' to make them sound like any sound, note or 
voice that you want. The Commodore 64 has three individual 
voices and one, two or all three of them can be played 
simultaneously. The sound can even be fed to an external 
amplifier to give a really professional sound. 

Inthis section I will refer only to voice 1 unlessstated. However, 
the principles for the other two voices are exactly the same. 
Simply substitute the numbers for the voice you want to use in 
place of the ones I use for voice 1 . These numbers are in the 
table at the end of this chapter and in Appendix 8. 

Sound on the Commodore 64 is controlled by the POKE 
command. It changes values in the SID (Sound Interface 
Device) chip which is the sound microprocessor in the64. It has 
27 different registers which control the three voices. Before 
you create any sound you need to set various parameters. They 
should be done in the following order. 

1 : VOLUME. This is a master control which controls the 
volume of all three voices at once. It is in the range (no volume 
— off) to 15 (full volume) values higher than 15 do other things 
and these will be explained later. The register to POKE is 54296. 
If you want to set volume to full, type POKE 54296,15. 

2: ATTACK/DECAY - This is set separately for all three 
voices. It is the setting which controls the rate at which the note 
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'hits you' and rises to its peak volume. Both values are 
controlled by one register per voice. The attack is controlled by 
the left-hand four bits (eight bits = one byte) and the decay is 
controlled by the right-hand four. The register to POKE is 
54277. 



ATTACK/ 


POKE 


ATK4 


ATK3 


ATK2 


ATK1 


DEC4 


DEC3 


DEC2 


-DEC1 


DECAY 


54277 


128 


64 


32 


16 


8 


4 


2 


1 



The larger the number the longer the time till the note reaches 
its peak. To get longer attack or decays or both add the 
respective bits together. 

To get a long attack but no decay add bits 8,7,6 and 5 
together. 

eg. 

128 + 64 + 32 + 16 = 240 
So POKE 54277 ,240. 

Or to get a medium attack and a medium decay, try: 

64 + 32 + 4 + 2 
POKE 54277, 102. 

3: SUSTAIN/RELEASE - This is set separately for each 
voice. It is the setting which controls how long a note stays at 
its maximum and how fast it decays to zero. Both settings are 
controlled by one register per voice. The sustain is controlled 
by the left-hand four bits and the release by the right-hand 
four. 

The register to POKE is 54278. 



SUSTAIN/ 


SUS4 


SUS3 


SUS2 


SUS1 


REL4 


REL3 


REL2 


REL1 


POKE 


RELEASE 


128 


64 


32 


16 


8 


4 


2 


1 


54278 
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The longer the sustain the longer the note takes to fade to zero. 
To get long sustains or releases or both, add the bits in the 
above table and POKE into 54278. 

eg. 

To program a note that will play indefinitely, use no release: 
POKE 54278,128 

Or a note that releases as soon as it reaches its peak: 
POKE 54278,7 

4: WAVEFORM — Each voice on the Commodore 64 can 
have one of four possible waveforms: triangle, sawtooth, 
pulse, or noise. 

You POKE register 54276 with the value for the waveform you 
want. 



WAVEFORM 


POKE 


TRIANGLE 


SAWTOOTH 


PULSE 


NOISE 




54278 


17 


33 


65 


129 



Changing the waveform can drastically change the sound 
produced. 

For example, to create a sawtooth waveform for voice 1 , type 
POKE 54276,33. 

5: HIGH FREQUENCY/LOW FREQUENCY - Each note 
you play on the Commodore 64 requires two values to be 
POKEd. The low frequency is nearly always the higher number. 
The low frequency register is 54272. The high frequency 
register is 54273. 

For example, to play a C (if all the parameters have been set), 
type 

POKE 54272,75 : POKE 54273,34 
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These two registers are used to play music or make noises on 
the triangle, sawtooth or noise waveforms. The pulse 
waveform has two different registers to be POKEd. 

5/b: (Pulse waveform only) — These are the low and high 
frequency registers for the pulse waveform. High frequency 
pulse is register 54275 which is POKEd with a number from to 
15. Low frequency pulse is register 54274 which is POKEd with 
a number from to 255. 

For example, to play a note first POKE 54276,65 (pulse set) 
then type 

POKE 54274, 1 50 : POKE 54275,7 

To play a scale on voice 1 , use the following program. It uses 
the triangle, sawtooth and noise waveforms. 

5 WF = 17 

10 POKE54296 , 15: P0KE54277 ,8: P0KE54278 ,35 
: REN UOL AND ADSR 
15 FORX=0TO2 

20 POKE54276,UF:REM WAUEFORM 

22 IFWF=17THENWF=33:GOTO30:REM CHANGE UA 

UEFORMS 

24 IFWF=33THENWF=129t REH CHANGE WAUEFORM 
S 

30 FORA=0TO8: READL ,H: REM NOTE DATA 

40 POKE54272,L:P0KE54273,H:REM MAKE NOTE 

50 FORR=1TO300: NEXTR: REM PAUSE 

60 NEXTA:REM GO BACK 8, DO NEXT NOTE 

65 RESTORE: NEXTX 

70 DATA75 ,34 , 126 ,38 ,52 ,43 , 198 ,45 ,97 ,51 ,1 
72,57,188,64,149,68,0,0 

There are also filters available for each voice. There is a high 
pass filter, a low pass filter and a band pass filter. They are all 
control led by location 54296 . The low pass filter is tu rned on by 
POKEing 54296 with 16. The high pass filter is turned on by 
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POKEing 54296 with 64. The band pass filter is turned on by 
POKEing 54296 with 32. (To turn on volumes as well add 1 5 to 
values). There are also filters which 'turn off' each voice; 
however, when you switch these filters off the voice sounds the 
same as before you filtered it. This is location 54295. 

To filter voice 3 POKE 54295,4 
To filter voice 2 POKE 54295,2 
To filter voice 1 POKE 54295,1 

You can also add resonance to the three voices. To do this you 
POKE 54295 with the respective bit (four to seven) ie. 8 to 1 28. 
You can add these values together to filter, each or all voices. 
For example to filter both voice 1 and 2 type POKE 54295,3. 
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SECTION 1.5 



PROGRAMMABLE CHARACTERS 

Every and any character that can be displayed on the screen 
can be changed or reprogrammed to represent anything else, 
say, a space invader or a Greek character set. 

Before trying to program characters it is necessary to 
understand how the normal character set is stored in memory. 

A character is made up of 64 dots, eight dots across by eight 
dots down. Each dot is a bit of computer memory and as eight 
bits are one byte a character takes up 8 * 1 byte which means 
that each character needs eight bytes to store. 

Here is how the letter 'A' is stored in memory. Each bit can 
have one of two values 1 or 0. The bits are then added together 
to get a decimal number for each of the eight rows. For the A 
they are as follows: 
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The data for an A is therefore 24,60,102,126,102,102,102,0. 
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Once the data for a character has been calculated it needs to be 
put into memory. There are 65 1 K blocks set aside for this 
purpose. However, not all of these can be used for this 
purpose. They start at and go up to 65536 but the first 
sensible one to use is 8192 (the eighth 1 K block). This allows 
6K of BASIC to be before your characters. If you need more 
than 6K then must move your characters to a higher block. So, 
if you need 1 6K then start your characters at 1 8432 (decimal). 

The video chip can only 'see' 1 6K at one time. Therefore a way 
is needed to allow it to 'see' the whole of the 64's memory. This 
method is called 'Banking'. It is controlled by location 56576. 

To change banks type the following in direct mode or in a 
program . . . 

POKE 56576, (PEEK(56576)AND 254)OR A 
Where A has the value from the following table. 



Value 
of A 


Bits 


Bank 


Starting 
Location 


Video Chip Range 





00 


3 


49152 


($ C000-$ FFFF) 


1 


01 


2 


32768 


($8000-$BFFF) 


2 


10 


1 


16384 


($4000-$7FFF) 


3 


11 








($0000- 3 FFFF) 
(DEFAULT VALUE) 
(Normal) 



The screen memory is the first 1 000 bytes in each bank, or is the 
colour memory in high resolution. 

For the A character we put it into memory as follows (the A 
starts at 8200 as the @ character is from 81 92 to 81 99): 
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10 FORA=0TO7 

20 READB:POKE8200+A,B 

30 NEXTA 

40 DATA 24,60,102,126,102,102,102,0 

Run this program. Then press the A key. You just get a normal 
A. In order to see our programmed character we need to tell 
the computer where to look for its character data. For data 
starting at 8192 type 

POKE 53272,24. 

The screen will now go strange. Press the A key. You should 
see a normal A. But if you press any other key or list the 
program, you will see lines. This is because only the A has been 
programmed to look like something that you want. Address 
53272 is the screen/character memory pointer. If you want to 
have your character data higher up memory, then add one to 
24 for every 1 K that you move your data up memory. Then 
POKE this number into address 53272. So, if you want to start 
your data at 16384 (16K) type 

POKE 53272,32 (24 + 8) 

To program different characters you need to utilise the screen 
character codes in Appendix 10, ie. C = 3. The formula for 
calculating the starting position for a specific character is as 
follows. I will use 8192 as my starting position. 

Character data address - 81 92 + (screen code * 8) to 81 92 
+ (screen code * 8) +7. 

To program more than one character, put all the data together 
and then use one or more FOR NEXT Loops to POKE the data 
in. The following program produces three characters re- 
programmed. 

10 FORA=0TO23 

20 READB:P0KE8192+A,B:NEXT 
30 POKE53272.24 
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40 PRINT" Hp Hf)B" 

50 DATA 129,189,165,255,126,36,66,36,0,2 
,15,25,57,255,24,24,0,64,240,152,164,255 
60 DATA12,12 

Sometimes you may want most, some or all of the standard 
characters in your new character set. Instead of programming 
each one by hand there is a quick and efficient method which 
can program some, most or all of the character set into RAM. 
The following program copies all the character set into RAM . If 
you want less than the whole set in RAM then adjust the FOR 
NEXT loop in line 30. 

10 P0KE56334,PEEKC56334DAND254 
20 P0KE1 , PEEK CI DAND251 

30 FORA=0TO2048: P0KE8192+A ,PEEKC53248+A ] 
: NEXT 

40 P0KE1 ,PEEKC1D0R4 

50 P0KE56334.PEEKC56334D0R1 

60 P0KE53272,24 

There are a few important things in this program which are 
hard to understand due to the architecture of the Commodore 
64. Here is a line by line breakdown of the program. 

Line 1 0: This command disables the interrupt. This allows the 

character ROM to be used. 
Line 20: This pages in the character ROM on top of the video 

chip. 

Line 30: This copies the character ROM to RAM. 
Line 40: This resets the interrupt. 

Line 50: This pages the video chip back in and the character 
ROM out. 

Line 60: This puts the 64 into 'programmed character mode'. 
DOUBLE CHARACTERS 

Unluckily there is no simple way to create and use double height 
characters on the 64, but it is still possible. The method 
involves POKEing the data into two consecutive bytes. 
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For example, a normal height A looks like this: 
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In other words each byte of the normal height character is 
repeated. 

In the following program a double height A is programmed. 

10 FORA=0TO15STEP2: READB: P0KE8192+A ,B: PO 

KE8193+A,B:NEXT 

20 PRI NT "ail" e PR INT" (V 

30 POKE53272,24 

40 DATA24 , 60 \ 1 02 , 1 26 , 1 02 , 1 02 , 1 02 , 
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You will now see a double height A in the top left-hand corner 
of the screen. One double height character takes two normal 
height characters to display. Because of this it is really only 
useful to use double height characters in something like the title 
of a program. 

The following program programmes the entire character set 
(up to code 128) to double height characters. The characters 
are made up in the same way as the previous program except 
that instead of data the character ROM is being used. 

10 P0KE56334,PEEKC56334 3f=lND254 
20 P0KE1 , PEEK CI JAND251 

30 FORA=0TO512STEP2: P0KE8192+A ,PEEKC5324 
8+A/2 D: P0KE8193+fl,PEEKC53248+A/2 J 
40 NEXT 

50 P0KE56334,PEEKC56334D0R1 
60 P0KE1 ,PEEKC1 D0R4 
70 P0KE53272,24 

80 PRINT-sJtJBirJIflHUILIiHlPlRUlUl^i^" 
90 PRINT"^lX:iEII31JIKII1I£llQlSlUl_Wiyi[ " 



MULTICOLOUR CHARACTERS 

So far we have only programmed characters in one colour. 
However, they can be multicolour having four colours out of 1 6 
in each eight by eight character. 

The procedure for creating these characters is basically the 
same as characters in one colour but there are some 
differences. 

The horizontal resolution of the characters is half that of one 
colour characters but the extra colour makes this sacrifice 
worthwhile. The colour resolution of the characters is still as 
high as on the arcade machines. The dot is double the width 
because the method used to programme the dots in more than 
one colour involves bit pairs. Instead of an 'on' dot being a one 
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and an 'off dot being zero there are four different combinations 
for on/off. These are 01 , 1 0, 1 1 , and 00. So, instead of putting 
a one where you want an 'on' dot you put an 11 or an 01 or a 1 
depending on which colour you want the dot to be. For an 'off 
dot you put a 00. 



These 'bit pairs' (pair of binary bits) stand for: 

BIT PAIR MEANING 

00 Screen colour 

1 1 Character colour 

01 Multicolour 1 
10 Multicolour 2 



To design your multicoloured character you need a four by 
eight grid. But the four across are all two bits in size. 



bits 76543210 
In multicoloured character mode a man could look like: 
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The binary data for this character is: 

00111100, 00011000, 11011011, 00011000, 00111100, 
00100100, 00100100, 11000011. 

And the decimal data is: 
60,24,219,24,60,36,36,195 

You just POKE the data into memory as if the characters were 
normal characters using the same locations (8192, for 
example). Once you have done this you enter the 
programmable character mode with: 

POKE 53272,24 (or any number you have already specified 
by the position of your character data). 

Then you have put the 64 into a multicolour mode. This is done 
with: 

POKE 53270,152 

If your cursor colour is betwen black and yellow (codes to 7) 
then you will notice no difference. Press the C = key and 1 . 
Now type something. See the characters are now in four 
colours. You will notice that the characters are almost 
unreadable. This is because multicolour characters depend on 
the various 'bit pairs', and normal characters are programmed 
to look good in one colour. Therefore, multicolour is really only 
useful for user-defined (or programmed) characters. We are 
not limited to the colours you see now. All of the three 
character colours are individually programmable. Each location 
controls a different 'bit pair' combination. 

The character colour or the colour screen POKE are controlled 
by printing in a colour code that is greater than seven (orange) 
by PRINT CHR$ (or POKEing location 646 or POKEing the 
screen colour POKE). This colours the dots with bit pairs of 1 1 . 

Multicolour 1 is controlled by POKEing location 53282. This is 
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POKEd with a number between and 255 . This location control 
the colour of 'bit pairs'. 

CODE 01 

Multicolour 2 is controlled by location 53283. It is POKEd with 
numbers between and 255. This location controls 'bit pairs' 
with code 10. The fourth colour is the background or screen 
colour and can only be altered by changing the screen colour 
with location 53281 . 

This is a program which programs a ghost in four colours and 
moves it about the screen. 

5 prints:' 

10 poke53270 , 152: p0ke53282 ,7: p0ke53283 ,2 
: p0ke53281 ,0: poke53280 ,0: p0ke53272 ,24 
20 fora=0to31 : readb: p0ke8192+a ,b: next: fo 

RA=0TO7: PQKE8192+32*8+A ,0: NEXT 

30 FORA=0TO39: P0KE55296+A , 13: P0KE55297+A 

,13: P0KE55336+A ,13: P0KE55337+A , 1 3 

40 POKE1024+A ,0: POKE1025+A , 1 : POKE1064+A , 

2:POKE1065+A,3 

50 POKE1023+A,32:POKE1063+A,32 
60 NEXT 

70 POKE1103,32:POKEM04,32:GOTO30 
2000 DATA0 , 3 , 1 5 , 63 , 255 , 253 , 253 , 253 , , 1 92 
,240 ,252 ,255 , 1 17 , 182 , 1 17 ,255 ,255 ,255 ,255 
2010 DATA255,255,51 ,51 ,255,255,255,255,2 
55,255.51 ,51 

It can therefore be seen that when you are designing your 
characters you need to use 'bit pairs' to get the desired effect. 

EXTENDED COLOUR MODE 

This mode allows you to colour the background as well as the 
foreground of a character that you can display on the screen, it 
is turned on with the command, 

POKE 53265,91. 
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For the first 64 characters the background colour (which can be 
from to 1 6) the screen forms the background. For the second 
64 (65 - 1 27 ) location 53282 controls the colour. For the third 
64 (128-191) location 53283 controls the colour. For the 
fourth 64 (192-255) location 53284 controls the colour. As 
can be seen, only characters with a code greater than 64 can 
have their background individually controlled. Thus, it is really 
only useful in a program. Warning — do not use this mode in 
conjunction with the multicolour character mode as it does not 
work. To turn off the extended colour mode, type 

POKE 53265,27. 

The following short program demonstrates the use of such 
characters: 

10 poke53265,9l:poke53281 ,0: poke53282 ,5s 

P oke53283,2:poke53284,8:pr int "ST 

20 pr i nt "^Rs^^^ot extended colour mo 

de" 

30 py i nt " qqg ^aatp x! ended colour mode :r 
em Just type letters 

40 pr int ,, aaaAAA<£NTENDED COLOUR MODE": re 
m type letters with the shift key presse 
d" 

50 in+ •■ nan F NTFNDFD COLOUR MODE :r 

em iype letters with the shift key press 
ed" 
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SECTION 1.6 



SPRITES 

This is probably the most useful and effective graphic capability 
on the Commodore 64. The sprites are far better than any on 
any other computer that have this feature. Their quality is as 
good as, or better than, arcade video games. 

A sprite is an object that is 24 dots across by 21 down. It can be 
coloured in any four of 16 colours at once. It is moveable one 
pixel (dot) at a time and automatically detects collisions with 
other sprites or screen characters and informs the video 
processor that it has done so. 



Sprites are generated by and controlled by the POKE 
command. A sprite is created on a 24 by 2 1 dot grid (three bytes 
across by 21 down). You add up the 'on' bits just as you would 
in programmable characters, except that there are three bytes 
across (instead of one) and 21 down (instead of eight) ie. 21 
groups of three bytes. 

You add the bits together for each byte, going across then 
down. So you do row 1 s three bytes then row 2s, etc. 

I will create a sprite in one colour to start with. 

To turn this picture into a strawberry (or any sprite) you add up 
the bits and form a list of 63 bits of data. 
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1 2345678123456 7812345678 




So the data is as follows: 

1000 DATA 3,0,192,3,129.192,3,231,128,1, 
231 ,128,8,24,0,7,219,0,15,219,224 
1010 DATA 15,255,240,31,255,240,57,255,1 
56,63,158,252,63,255.252,21 ,243,248,15 
1020 DATA 255,240,15,159,208,3,255,192,3 
,221 ,192,1 ,255,128,0,255,0,0,126,0,0,24, 





Right. Now sprites have to be stored in memory like 
programmable characters. Each one is stored in a block of 
memory that is 64 bytes long. These blocks start at location 
and go up to 1 6320. However, the first block that can safely be 
used is 13, ie address 832 onwards. Addresses 1024 to 2047 
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are also unuseable as the screen is there. So you can use 
locations 2048 to 1 6320. To calculate what the blocks starting 
address is, use this simple formula: address = block * 64. 
Blocks up to 255 can be used. For example, block 250 starts at 
location 1 6000. So using the data above we POKE the data into 
a block. I will use 13 (832 - ) so our program looks like this. 

10 FORA=0TO62 

20 READB: P0KE832+A ,B: REM PUT SPRITE DATA 

INTO MEMORY 
30 NEXT 

1000 DATA 3,0,192,3,129,192,3,231,128,1, 

231 ,128,0,24,0,7,219,0,15,219,224 

1010 DATA 15,255,240,31,255,240,57,255,1 

56,63,156,252,63,255,252,21 ,243,248,15 

1020 DATA 255,240,15,159,208,3,255,192,3 

,221 ,192,1 ,255,128,0,255,0,0,126,0,0,24, 



Now our sprite is created but we can't see it. There are two 
reasons for this — it is not turned on and it is off the screen. For 
this we need to go to the video chip which starts at location 
53248. 

To make the numbers easier to remember I will assign the 
beginning of the video chip to a variable, ie V = 53248. 

I will refer to registers in the video chip as the variable plus a 
number, ie V + 4. 



NOTE 

When POKEing the variables make sure that V is set at 53248. 
Otherwise the examples will not work and the computer might 
crash (go into an endless loop). 

To turn on a sprite we use register V + 21 . Each sprite is turned 
on by its respective bit: 
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Sprite = bit 1 
Sprite 1 = bit 2 
and so on to: 
Sprite 7 = bit 8 

Each bit has its own specific value. 



sprite number 


7 


6 


5 


4 


3 


2 


1 





bit number 


8 


7 


6 


5 


4 


3 


2 


1 


value 


128 


64 


32 


16 


8 


4 


2 


1 



For example, Sprite is turned on with POKE V + 21,1 (or 
POKE 53269, 1 ) . To turn on more than one sprite at a time you 
add their 'bit values' together. 

eg. 

To turn on sprites 0,1, 2 and 7, add 1 + 2 + 4 + 128 = 135 so 
type POKE V + 21 ,135. 

Now we have to tell the video chip where tof ind the data for our 
sprite. This is handled by eight locations which are just before 
BASIC RAM (where BASIC or machine code programs are 
written). You POKE the respective location with the block 
number in which the sprite data is stored. The addresses are as 
follows: 



Sprite 2040 

Sprite 1 2041 

Sprite 2 2042 

Sprite 3 2043 

Sprite 4 2044 

Sprite 5 2045 

Sprite 6 2046 

Sprite 7 2047 
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eg. 

To tell the video chip that the data for sprite 2 is in block 
(13(832-) type: 

POKE 2042,13 

If the data for sprites 3 and 5 are in block 1 3 then type: 
POKE 2043,1 3: POKE 2045,13 

Now turn on sprite 2 with POKE V + 21 ,4. To tell the video chip 
that the data for our strawberry is in block 13, type POKE 
2042,13 (I am making the sprite 2 the strawberry). 

However, we still cannot see our sprite. We need to position 
the sprite onto the sceen. Each sprite has an X co-ordinate and 
a Y co-ordinate. These are controlled by two registers for each 
sprite. For sprite 2, the X co-ordinate register is V + 4, (or 
53252). It can be POKEd from to 255. Try POKE V + 4,1 00. 

We still cannot see our sprite. This is because the sprite is still, 
above the screen. The register for the Y co-ordinate is V + 5. It 
can be POKEd with to 255. Try POKE V + 5,100. There it is. 

If you can't see the sprite then it is probably the same colour as 
the screen. Try changing the screen colour or the sprite colour 

The registers to change the sprite's colour are V + 39 to V + 46 
for sprites to 7 respectively. To change the colour of a sprite, 
POKE the respective register with a number from to 1 5. (The 
colour codes for sprites are the same as the screen or character 
codes.) So, to change the colour of the strawberry to red type 
POKE V + 41 ,2 (or 10 if you want a light red strawberry.) 

Using the horizontal(X) and/or vertical(Y) registers, we can 
move the sprite anywhere on the screen. I know a strawberry 
does not fly but anyway here goes. 
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10 FORA=0TO62 

20 READB:P0KE832+A,B:REM PUT SPRITE DATA 

INTO MEMORY 
30 NEXT 

40 POKE2042 , 13: PR I NT "sJ 1 : U=53248: POKEU+21 
? 4:POKEU+41 ,2:P0KE53281 ,0: POKE53280 ,0 
50 POKEU+5 ,200: FORX=0TO255: POKEU+4 ,X: NEX 
T 

60 FORY=200TO0STEP-1 : POKEU+5 ,Y: NEXT 
70 POKEU+4 ,0: GOTO50 

1000 DATA 3,0,192,3,129,192,3,231,128,1, 

231 ,128,0,24,0,7,219,0.15,219,224 

1010 DATA 15,255,240,31,255,240,57,255,1 

56,63,156,252,63,255,252,21 ,243,248,15 

1020 DATA 255,240,15,159,208,3,255,192,3 

,221 ,192,1 ,255,128,0,255,0,0,126,0,0,24, 





In this program it is lines 50 and 60 that do the work. They use a 
loop to POKE the co-ordinates into the X and Y registers. But 
wait\\\W Why is the sprite not going all the way across the 
screen??? 

This is because the Commodore 64 's screen is 320 dots across 
by 200 dots down and a register can only hold a number 
between and 255. To get around this problem the 64 has a 
special register which allows us to use the rest of the screen. It 
moves the sprite to the 256th dot across. Then you use the X 
co-ordinate register (V + 4) to move the sprite. The register is 
V + 1 6 . You POKE this register with the bit value for the sprite 
that you want to go to the end of the screen. For example, 
POKE V + 1 6, 1 29 puts sprites and 7 to the 256th dot. When 
your sprite is finished in this part of the screen you must put it 
back by resetting V + 16 to zero (or the value contained in 
V+16 minus the bit value for the sprite you are removing). For 
example, if if contained 1 29 and you remove only sprite 7 then 
you would POKE V + 1 6,1 . To make the last program make the 
sprite move to the end of the screen change line 50 to: 
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50 POKEU+5 ,200: FORX =0TO255: POKEU+4 ,X: NEX 
T: POKEU+16 ,4: FORX=0TO63: POKEU+4 ,X: NEXT 



And line 60 to: 

60 FORY=200TO0STEP-1 : POKEU+5 ,Y: NEXT: POKE 
U+16,0 

A sprite does not have to remain 24 dots across by 21 dots 
down. It can be doubled in width, height or both, by two simple 
commands. 

The sprite is created normally and can then be expanded at will. 
The resolution of dot is halved (ie the dot becomes double the 
dimensions). 

The register for horizontal expansion is V + 29(53277). You 
POKE V + 29 with the bit value for the sprite/s that you want to 
expand. To return the sprite to normal, you POKE V + 23 with 
zero or the value in the register minus the sprites bit value. 

Stop the sprite program with the strawberry on the screen. 
Type POKE V + 29,4 and you should see that your sprite has 
now doubled in width. 

The register for vertical expansion is V + 23(53271 ). You POKE 
this register with the sprite's bit value just as you did for 
horizontal expansion. To return your sprite to normal you type 
POKE V + 23,0 (or the total in the register minus the sprites bit 
value). Try POKE V + 23,4 and you should find that the sprite 
has now doubled in height. 

The vertical and horizontal registers can be used separately or 
together. So you can have normal, double width, double 
height and both double height and width sprites on the screen 
at once. 
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Now back to the old program. But do not turn the 64 off. Type 
in the following program. . . and run it. 



1 PRINT'S: 1 '.P0KE53281 ,0: PDKE53280 ,0 

10 POKE2040,13:POKE2041 , 13: POKE2042 , 13: P 

OKE2043 13 

20 U=53248: POKEU+21 ,255: POKEU+39 ,2: POKEU 
+40,3:POKEU+41 , 10: POKEU+42 , 12 
30 POKEU ,100: POKEU+2 ,200: POKEU+4 , 100: POK 
EU+6 200 

40 POKEU+l ,100:POKEU+3,100:POKEU+5,100:P 
OKEU+7,200 

50 P0KEU+23,6:P0KEU+29,3 
60 FORR=0TO200: NEXT: REN REST 
70 P0KEU+23,l:P0KEU+29,4 
80 FORR=0TO200:NEXT 
90 GOTO50 



Stop the program. Clear the screen and list the program. Notice 
that the sprites cover the characters. Sprites can be made to go 
under text or graphics. The register V + 27 controls this. As 
with other control registers, you POKE it with the respective bit 
values for each sprite. Type POKE V + 27,3. See the sprites go 
behind the characters. When you want the characters to go 
back in front of the characters you can, for example, reset this 
register with POKE V + 27,0. 

A sprite can detect collisions with other sprites or with screen 
characters. There are two registers which control this. 

Firstly sprite/sprite collision. This is registerV + 30(53278). If a 
sprite hite another sprite then the two sprites bits are set. 

eg. 

If sprite hits sprite 2 then register V + 30 would contain five, 
ie with bits set. 
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bit 8 7 6 5 4 3 2 1 



Sprite 



Value 



If all eight sprites were in collision then all eight bits would be 
set and V + 30 would contain 255. 

8 7 6 5 4 3 2 1 



New the old program but do not turn the machine off. (This is 
because you will need the sprite data.) Try this program using 
two strawberries. 

10 FORA=0TO24: PRINT" 1 
1" :NEXT 

20 POKE2042 ,13: POKE2040 , 13: U =5324,8 

30 POKEU+21 ,5:P0KEU+41 , 10: POKEU+39 ,5 

40 POKEU+1 ,100:POKEU+5,100:D=1 

50 POKEU ,X+30:POKEU+4 ,255-X: X=X+D 

55 IFPEEKCU+31 D=40RPEEKCU+31 }=5THEND=1 

60 IFPEEKCU+30D=5THEND=-1 

70 GOTO50 

There is a register which detects whether a sprite has hit a 
background character — it is V + 31. This location has the 
sprites respective bit set if that sprite hits a character. For 
example, if both sprites 1 and 2 hit the background then V + 31 
would contain six. 

Unluckily there is no simple way of telling which character the 
sprite has hit. The only way is to use a subroutine like the one 
below. 
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10000 C=INTC1024+CPEEKCSPRITE Y REG3D/8+ 
CPEEKCSPRITE X REG 3 3/8 3 

10010 IFPEEKCU+1Q3=SPRITE'S BIT THENC=C+ 
32 

10020 CH=C 

10030 REM CHARACTER IS IN CH 
MULTICOLOUR SPRITES 

Muticolour mode allows each sprite to have four colours in its at 
once. 

The principal for programming them is basically the same as 
multicolour characters in that they have half the horizontal 
resolution and the use of bit pairs determines their colours. 

For multicolour sprites the following bit pairs control these 
colours: 

00 Screen colour 

10 Sprite foreground colour 

11 multicolour 2 

01 multicolour 1 

When you have created your sprite and coloured it in 
multicolour, it retains its colours unless you change them or 
press RUN/STOP and RESTORE. 

To create a multicolour sprite we first need to turn on 
multicolour mode. This is done by register V + 28 . Each sprite is 
put into multicolour mode by POKEing V + 28 with the sprites 
respective bit. For example, to put sprites and 2 into 
multicolour add 1 +4 = 5. 

So POKE V + 28,5. 

There are certain registers for controlling the colour of each 
sprite. The foreground (10 bit pair) is controlled by registers 
V + 39 to V + 46, for sprites to 7 respectively. For example, 
POKE V + 41 ,2 makes the foreground of sprite 2 red. 
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The register V + 37 controls the colour (multicolour 1 ) with bit 
pair 01 . This register controls the multicolour 1 for all eight 
sprites. So, if yo type POKE V + 37,2 any multicoloured sprite 
that is on will have any 001 bit pairs coloured red. 

The register V + 38 controls the colour (multicolour 2) with bit 
pair 1 1 . This register controls the multicolour for all eight 
sprites. So, if you type POKE V + 38,5 any multicoloured sprite 
that is on will have any 1 1 bit pairs coloured green. 

So you design a sprite with bit pairs as follows. I will design a 
strawberry. 

* 24 * 



765432107 6543210 76543210 
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Bit Pairs 



I I 

The above strawberry will be red, have yellow pips and green 
leaves. Therefore, the red will be bit pair 1 1 , the yellow 1 and 
the green 01 . 
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Now the data for the above sprite is added up an POKEd into 
memory. 



10 FORA=0TO62: READB: P0KE832+A ,B: NEXT 
100 DATA 0,0,0.0.0,0.20,0,80.21,1,80,5,6 
9,64 ,5,69,64,1 ,69,0,0,68,0,3,87,0,15,255 
110 DATA 192,59,251,176,255,255,252,254, 
239 , 188 ,255 ,255 ,252 ,239 ,251 ,236 ,255 ,255 
120 DATA 252,63,190,240,63,255,240,15,18 
7,192,3,255,0,0,204,0 



Now we need to turn on our sprite (I will use sprite 2): 
POKEV + 21,4 

Now turn on multicolour mode for sprite 2: 
POKE V + 28,4 

Put the sprite onto the screen: 
POKE V + 4,1 00: POKE V + 5,1 00 

Now we colour the sprite — to colour the sprite strawberry red: 
POKE V + 38,2 

Now we make the leaves green: 
POKEV + 37,5 

Now we make the pips yellow: 
POKE V + 41, 7 

Now we have a sprite in four colours (the background being the 
fourth). 

The following program generates all eight sprites in four 
colours and moves them about the screen. 

78 



5 PRINT'sJ' 

10 U=53248:P0KEU+21 ,255: POKEU+28 ,255: POK 
EU+33,0:POKEU+32,0 

20 FORA=0TO62: READB: P0KE832+A ,B: NEXT: FOR 
A=0TO7: POKE2040+A ,13: NEXT 
22 POKEU+37 ,5: POKEU+38 ,2: FORf=l=3TO10: POKE 
U+39+A-2 , A: NEXT 

25 POKEU+1 ,50:POKEU+5,100:POKEU+9 ,150:PO 
KEU+13,200 

30 FORX=0TO255: POKEU ,X: POKEU+4 ,X: POKEU+8 
,X:P0KEU+12,X 

40 POKEU+2 ,50: POKEU+6 , 100: POKEU+10 , 150: P 
OKEU+14 ,200 

50 POKEU+3 ,X: POKEU+7 ,X: POKEU+1 1 ,X:POKEU+ 
15, X 
60 NEXT 
70 G0T022 

100 DATA0 ,0 ,0 ,0 ,0 ,0 ,20 ,0 ,80 ,5 ,69 ,64 ,5 ,69 

,64,1 ,69,0,0,68,0,3,87,0,15,255 

110 DATA192,59,251 ,176,255,255,252,254,2 

39 , 188 ,255 ,255 ,252 ,239 ,251 ,236 ,255 ,255 

1 20 DATA252 ,63 , 1 90 ,240 , 63 ,255 ,240 , 1 5 , 1 87 

.192,3,255,0,0,204,0,0,0,0 
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SECTION 1.7 



HIGH RESOLUTION GRAPHICS 

High resolution graphics without 'Simon's Basic' is easy on the 
Commodore 64. In order to do this section you must under- 
stand exactly how programmable characters work. This is 
because the individual dots are programmed by their 
respective bits. 

The high resolution screen on the Commodore 64 is 320 dots 
across by 200 dots down. That is a total of 64,000 individually 
controllable dots. You can have up to 1 6 colours on the screen 
at once, but more of that later. 

Firstly we need to put the 64 into high resolution mode. When 
we do this it makes each line of eight bits (dots) across the 
screen as one byte, so that if you typed POKE 1024,1 you 
would get a single dot, not an 'A'. Therefore, instead of 40 
bytes across by 25 down (which makes 1000), we have 40 
bytes across by 200 down, making a 320 bit by 200 byte 
screen. This occupies 8K, so we need to move the screen 
upwards in memory to accommodate this. The following 
program does just that: 

10 A=56576:B=53248: POKEA ,PEEKCA DAND254: P 
□KEB+24 ,8:P0KEB+17,PEEKCB+17J0R32 

Screen memory now starts at 24K (24576) and the colour 
memory at 1 6 K ( 1 6384) . If you type in the above program and 
run it, you will notice that the screen is scattered with unusual 
shapes of random colours. Obviously we need to clear the 
screen and make it a single colour (white). This program takes 
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a long time, so be patient. 

50 FORX=0TO1000: P0KE16384+A , 1 : NEXT 
60 FORX=0TO8000: P0KE24576+A ,0: NEXT 

Now we have our high resolution screen set up, we need a 
routine to actually plot a point on the screen. The following 
subroutine does just that: 

1000 Yl=INTCY/83: Y2=Y~Ylx8 

1010 X1=INTCX/83:X2=X-Xlx8 

1020 CH=CYlx320 3+CX1X8 3+Y2: BI =2tC7-X2 3 

1030 P0KE24576+CH,PEEKC24576 30RBI 

1040 RETURN 

The above routine depends on another routine to provide the X 
and Y values to this routine. 

The following program combines all done so far with a routine 
to provide X and Y values for drawing a circle: 

10 A=56576:U=53248 

20 POKEA ,PEEKCA0 3AND254 

30 POKEU+24,8 

40 P0KEU+17,PEEKCU+17 D0R32 
58 FORX=0TO1000: P0KE16384+X , 1 : NEXT 
60 FORX=0TO8000: P0KE24576+X ,0: NEXT 
70 C=110:D=100 

80 FORS=0TO6.5STEP0.01:X=CxSINCS 3+160: Y= 
DxCOSCS 3+100 

90 X = INTCX+.5 3: Y = INTCY+ .5 3: GOSUB1000 
100 NEXT 

1000 Y1=INTCY/8D: Y2=Y-Ylx8 

1010 X1=INTCX/83:X2=X-Xlx8 

1020 CH = CYlx320 3+CXlx8 3+Y2:BI =2tC7-X2 3 

1030 P0KE24576+CH ,PEEKC24576 30RBI 

1040 RETURN 



Of course, the routine in lines 70 to 1 00 can be changed to 
whatever you want. 
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To draw a vertical line change lines 70 to 100: 
70 D=100 

80 FORS=0TO3STEP0.01:X=160:Y=S*D 

90 X = INTCX+.5D: Y = INTC Y+ .5 3: GOSUB1000 

100 NEXT 

Or to draw a diagonal line: 
70 C=160:D=108 

80 FORS=0TO2.23STEP0.01:X=S*C: Y=S*D 
90 X = INTCX+.5 3: Y = INTC Y+ .5 3: GOSUB1000 
100 NEXT 

Finally, the following program draws a sine curve: 

10 fi=56576:U=53248 

20 P0KEA,PEEKCA3AND254 

30 POKEU+24,8 

40 P0KEU+17,PEEKCU+17 30R32 

50 FORX =0TO 1000: POKE 16384+X , 1 : NEXT 

60 FORX=0TO8000: P0KE24576+X ,0: NEXT 

62 C=160:D=100 

63 FORS=0TO1 .999STEP0 .01 : X=S*C: Y=100 

64 X = INTCX+.5 3: Y=INTC Y+ .5 3: GOSUB1000 

65 NEXT 

66 D=100 

67 FORS=0TO2STEP0.0l:X=30:Y=S*D 

68 X = INTCX+.5 3: Y = INTC Y+ .5 3: GOSUB1000 

69 NEXT 

70 C=160:D=100 

80 FORS=3TO12STEP0 .01 : X=S*C/5-65: Y=SINCS 
3*D/1 .3+87 

90 X = INTCX+.5 3: Y = INTC Y+ .5 3: GOSUB1000 
100 NEXT 
200 STOP 

1000 Y1=INTCY/83:Y2=Y-Y1*8 

1010 X1=INTCX/83:X2=X-X1*8 

1020 CH = CYlx320 3+CXlx8 3+Y2:BI=2tC7-X2 3 

1030 P0KE24576+CH .PEEKC24576+CH 30RBI 

1040 RETURN 
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It would be pretty useless if we could only draw lines etc. in one 
colour, on one colour of background. The addresses 1 6384 to 
17383 in the previous example control the colour of the lines 
and the background. The background in each 8 by 8 dot 
square can be controlled as well as the line or foreground 
colour. The value to poke for the colours are calculated by the 
following formula: 

NUMBER = (1 6*foreground colour) + background colour. 

The colours are the same as for the characters. 

e.g. To colour the background black and the line white 
POKE the addresses with 16 

FOR A = 1 6384 TO 1 7383 : POKE A, 1 6 : NEXT 

Multicolour is controlled the same as it is in BASIC 

POKE53265,PEEK(53265) OR 16 

Every dot you plot will be two dots in width. Just follow the 
same rules as you would in multicolour programmable 
characters. 



84 



SECTION 1.8 



OTHER COMPUTERS' BASICS 

This section is for people who like the look of programs in 
magazines and want to type them in but find that they are not 
for their machine. I will cover conversion of programs in ZX81 , 
ZX Spectrum, VIC 20 and Commodore Pet BASIC to 
Commodore 64 BASIC. 

For screen displays you need to take account of screen size and 
adjust the variables accordingly. ZX81 and Spectrum 
programs contain frequent PRINT AT X,Y; statements. This 
command contrary to popular belief is possible on the 
Commodore 64. If a program has PRINT AT 21 ,2;"HELLO" 
(ZX computers) then enter the following on the 64: 



POKE 781 ,21 :POKE 782,2:SYS 65520: PRINT'HELLO" 

781 is the location to POKE for the column and 782 for the 
row. SYS65520 is an inbuilt routine for positioning the cursor. 



If you do not adjust the scaling of the variables the program will 
just use part of the screen. 



The following table contains various pieces of information 
about the four machines listed above, and what they are on the 
Commodore 64. 
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FUNCTION/ ZX81 
MACHINE 



SPECTRUM VIC20 PET COMMODORE 

64 



Screen 
locations 



Size of 
screen 
Colour 
screen 
memory 



32*22 



non- 
standard, 7680- 8185 32768- 
but 16384 to (4096 - 4605 33767 
22528 with 8K 

pixels expansion) 
approxi- 
mately. 



1024 -2023 



32*22 
Uses PRINT 
AT X,Y; 
INK colour 



22*23 
38400- 
38906 
(37888 - 
38393 with 
8K 

expansion) 



40*25 



40*25 
55296 - 
56295 



BASIC 
memory 


16524- 
(32768 if 
16K) 


22528 
approxi- 
mately 


4096 - 7679 1024- 
but anything 
from 1 024 - 
32767 


2048- 
40959 (for 
BASIC) 


Start for 
program- 
mable 
characters 




Uses POKE 
USR"A" to 
POKE 
USR"Q" 


4096/ 
5120/ 
6144/ 
7168 


2048- 

(standard 

8192) 
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SECTION 1.9 



THE PERIPHERALS 

This section is divided into four subsections: 

1 . Cassette file handling 

2. Joysticks and paddles 

3. Printer 

4. Disc Drive 

CASSETTE FILE HANDLING 

The cassette can be used to store data files (streams of data). It 
does this in a serial fashion, i.e. it puts data onto the tape in a 
'one after the other' way. 

In order to write a file to the tape we need to open a channel to 
the tape. This is done with the OPEN command: 

OPEN 1 ,1 ,2, "name" (or a string) 

The second number of this command must be a one as this is 
the device number for the cassette recorder. 

To put data onto the tape the PRINT #1 command is used. 
Usually this is done in a loop. 

The following program copies the screen onto tape. As can be 
seen from the program you must close the file when you are 
finished. This is done with CLOSE 1 . 

10 0PEN1 ,1,2, "SCREEN SAUE" 

20 FORA = 1 024TO2023 : B =PEEK C A D : C =PEEK C A+54 

272 3 

30 PRINT#1 ,B:PRINT#1 ,C:NEXT 
40 CL0SE1 
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However, the above routine is pointless unless we can retrieve 
the information from the tape. The INPUT =§= 1 and the GET # 1 
commands do this. Their function is basically the same, but 
GET f 1 is used where one character is wanted at a time. 

To get the saved screen off the tape (saved with the previous 
program) use the following program: 

10 0PEN1 ,1,0, "SCREEN SAUE" 

20 FORA = 1024TO2023: INPUT*1 ,B: INPUT*1 ,C 

30 P0KEA,B:P0KEA+54272,C:NEXT 

40 CL0SE1 

As the cassette has to 'run through' to find data, it is not really 
practicable to store a lot of data onto the tape, but if speed is 
not required then it is ideal if used with a C90 cassette. The 
above method works for any data. You can use any variable or 
characters in quotes. 

JOYSTICKS 

You can use two joysticks on your Commodore 64. They plug 
into the ports on the right-hand side of your computer. To read 
the joysticks (find out their position) you need to PEEK certain 
addresses. I will start with Joystick which plugs into the port 
nearest the front of the computer. 

To read the joystick you PEEK address 56321 . These are the 
values obtained 



Sets bit X to 



normal (no movement) 255 no bits 

left 251 three 

right 247 four 

up 254 one 

down 253 two 

fire 239 five 

up/left 250 one and three 

up/right 246 one and four 

down/left 249 two and three 

down/right 245 two and four 
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However, if the fire button is pressed when the joystick is not 
at 'normal' position the above values will not hold. So the 
result should be ANDed. For example, to check if fire has been 
pressed: 

IF PEEK(56321 )AND 239 = 239 THEN GOSUB fire routine. 

IF PEEK(56321)AND 16 = THEN GOSUB fire routine. 

Now for Joystick 1 . To read this joystick (which plugs into the 
port at the back of the computer) PEEK ADDRESS 56320. 

The values obtained when address 56320 is PEEKed are as 
follows: 

Sets bit X to 

normal (no movement) 127 no bits 

left 123 three 

right 119 four 

up 126 one 

down 125 two 

fire 111 five 

up/right 118 one and three 

up/left 122 one and four 

down/left 117 two and three 

down/right 121 two and four 

As with joystick the value should be ANDed to obtain a true 
value. For example, to move left: 

IF PEEK (56320) AND 123 = 123 THEN GOSUB left routine. 

This is because the AND command effectively filters out any 
outside values. 

THE PRINTER 

This section will deal with the basics of using a printer. This is 
mainly for people who have access to one, and for people who 
own a printer but don't want or need to know how to do 
amazing things with it. The following information works on the 
VIC 1515 printer and the Seikosha GP 100 VC printer, but it 
may well work with others. 
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The printer has a switch on the back that has 4 5 T on it. 
If you put this switch to 'T and switch on the printer, the 
printer will self test. If you see any malformed characters, 
check the paper feed and the ribbon. If the problem still 
persists your printer may need attention. The positions '4' and 
'5' are the device number for the printer. This means that you 
can have two printers connected to your Commodore 64. The 
normal number for this switch is '4' and it is at this position that 
all of the following programs will work. 

If you have written a program and you want a listing (copy on 
paper) type: 

OPEN 4,4 : CMD4 : LIST 

You can use any of the formats for LIST, i.e. LIST 1 00- 200 as 
if it was on the screen. When the listing is complete you need 
to CLOSE the channel to the printer. There is a special way to 
do this: 

PRINT f 4: CLOSE 4 

If you do not do it this way the channel will not be properly 
closed and could cause problems later. 

You can print directly onto a printer or under program control. I 
will do it in a program as if this is not done, the word READY is 
printed when the printer is finished. 

Instead of printing onto the printer by using the CMD 
command (which sends all output to the printer you can 
selectively choose whether you want the information on the 
screen or the printer. This command is PRINT #4. 
There are various control characters which change the output 
from the printer. They are as follows: 

CHR$ (10) Line feed after printing (carriage 

return). 

CHR$ (13) Line feed after printing (carriage 

return). 
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CHR$ (14) Double width characters. 

CHR$ (8) Graphic mode command. 

CHR$ (15) Normal width characters. 

CHR$ (16) PRINT start position addressing. 

CHR$ (27) When followed by CHR$ (16), it 

is used to specify a start position 
according to the dot address. 

CHR$ (26) Repeat graphic select command. 

CHR$ (145) Cursor up mode command. 

CHR$ (17) Cursor down mode command. 

CHR$ (18) Reverse field characters. 

CHR$ (146) Reverse field off (normal 

characters). 



For example, to print in double width characters type one of 
the following: 

OPEN 4,4:CMD 4 :PRINT CHR$ (14) 
OPEN4,4:PRINTf:4,CHR$ (14) 

THE DISC DRIVE 

This is a short section that lets you use VIC 1 540 disc drive with 
the Commodore 64. This drive is not normally useable with the 
64 but it can be done. 

Before LOADing, SAVEing or VERIFYing, the following 
command must be typed: 

POKE 53265,11 

For example, to load the disc directory: 
POKE 53265,1 1 :LOAD "$" , 8 

As this blanks the screen you need to bring the screen back. 
This is done by either pressing RUN/STOP and RESTORE or 
typing POKE 53265,27. 

To format a disc (essential before using a disc for the first time) 
type: 
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OPEN 15,8,15 : PRINT #15, "NEW :disc name,10" 
Then type: 

PRINT f 1 5, "INITIALISE 1 0,disc name,1 0" 

To save a program, type: 

POKE 53265,1 1 :SAVE " 0: program name, number 
between and 255", 8 :POKE 53265,27 

To verify the program, type: 

POKE 53265,1 1 :VERIFY"0:program name",8:POKE 
53265,27 

To load the program back in, type: 

POKE 53265,1 1 :LOAD"0:name",8 

Then when the red light on the drive goes out, type POKE 
53265,27 or press RUN/STOP and RESTORE. 

If you have a 1541 disc drive, the commands are exactly the 
same except that you miss out the POKE 53265,1 1 and POKE 
53265,27 commands. 
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SECTION 1.10 



SPEEDING UP BASIC 

Even though the BASIC on the Commodore 64 is fast for 
BASIC it is still relatively slow. This section will tell you how you 
can speed up your BASIC programs to their limit. 

1 . If you use variables instead of lots of numbers you save a 
considerable amount of time. Each variable used saves approx 
five to ten milliseconds. This may not sound a lot but if there are 
lots of loops where numbers are constantly handled, as in 
games or mathematical programs, the time saving is 
considerable. 

2. When FOR NEXT loops do not put a variable after the 
NEXT. This also saves quite a lot of time. 

3. Put all frequently used subroutines at the beginning of a 
program. This is because BASIC starts at the beginning of a 
program to look for a routine. So, if your subroutine is at the 
end of your program, every time you use your subroutine it has 
to wait until BASIC gets to it. If it is at the beginning then 
BASIC hardly has to look and so saves time. 

4. Use FOR NEXT loops where possible in preference to 
loop like this: 

10A = A + 1:IF A< 21 THEN 10 

5. Use single letter variables instead of double or more. 

6. Try to use low line numbers (10 is better than 10,000). 
Finally, if you want really fast programs use machine code. 
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SECTION 2.1 



MACHINE CODE 

Now that you have passed BASIC and into the realms of 
machine code, you may be asking "Well, what is machine 
code?". Quite simply it is the language that the microprocessor 
understands. In the Commodore 64 the microprocessor is a 
6510 which is an upgraded 6502. Therefore, the 64 runs 6502 
machine code. 



Before we start, let us look at a program in BASIC and 
machine code: 

10 A=l:B=10 

20 C=A+B 
30 PRINTC 

That is pretty straightforward. Now look at its machine code 
counterpart. 

.■:1C00 A9 01 69 0A 8D 00 04 A9 
.:1C08 01 8D 00 D8 60 FF FF FF 

Well, this is pretty unintelligable isn't it. As this is so unread- 
able there is such a thing as assembly language. This is really 
just the human version of machine code. This assembly 
language allows us to write relatively readable programs but 
that run at machine code speed. Here is the above program in 
assembly language: 

1C00 A9 01 LDA **01 

1C02 69 0A ADC *t*0A 

1C04 8D 00 04 STA *0400 

1C07 A9 01 LDA #*01 
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1C09 8D 00 D8 STA *D800 
1C0C 60 RTS 

This, though strange at first, is far easier to read and 
understand than the previous machine code program. 

This section will teach assembly language and will finish by 
explaining how assembly language can be directly changed into 
machine code for entering into the 64. 

As in section 1 (BASIC), I will not go through the commands in 
alphabetical order but in the order of simplest to hardest to 
understand. If you don't understand it immediately then read it 
again and again. It will eventually become clear and you will be 
writing machine code without a second thought. The 
commands will be listed in a tabular form with all the variations 
of each command in one block. Good reading and good luck! 

The 6510 registers 

The 6510 has what is known as registers which do all the work. 
They can be thought of as a kind of memory location which 
controls the running of any program. 

Accumulator 

The accumulator is the most important register in the 6510. It is 
where all arithmetic functions are done. It is an eight bit register 
and therefore can hold only a value between zero and 255. 

X Register (or X Index) 

This is one of the secondary registers in the 651 0. It is also an 
eight bit register and can only hold a number up to 255. It does 
not allow arithmetic functions but its contents can be 
transferred to and from the accumulator. 

Y Register (or Y Index) 

This is pretty well identical in working to the X register and can 
perform nearly all the same functions. 
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The Status Register 

This register consists of eight flags; a flag is something that 
indicates that something has or has not occurred. 

The Program Counter 

This is the only 16 bit register in the 6510. It contains the 
address of the current machine language instruction being 
executed. It is therefore always changing. 

The Stack Pointer 

This register contains the location of the top empty space on 
the stack. The stack is used for temporary storage by machine 
language programs and by the computer's operating system. 

NUMBERING SYSTEMS 

Hexadecimal numbers 

Hexadecimal is the normal numeric system used in machine 
code. Unlike the decimal system it is not in base 1 but in base 
16. If you find it hard to grasp then keep trying as it makes 
machine code programming a lot easier. 

In decimal the base is 1 therefore there are 1 different digits. 
These are the numbers zero to nine. In hexadecimal the base is 
1 6 and as there are only 1 numerals we need six more. The first 
six letters of the alphabet are used for this (A to F). 

DECIMAL HEXADECIMAL 






00 


1 


01 


2 


02 


3 


03 


4 


04 


5 


05 


6 


06 


7 


07 


8 


08 


9 


09 
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10 


OlA 
Wn 


1 1 




12 


0C 


13 


0D 


14 


0E 


15 


0F 


16 


10 



and so on 



In decimal as you move left the powers of 10 increase by one 
each time. For example, 4096 is (4* 1000) + (0*100) + (9*10) 
+ 6 In hexadecimal (Hex) itisthepowersof 16 that increase by 
one each time. For example, 1 ED2 is (1 *4096) + (14 * 256) + 
(13* 16) + (2). In decimal the range of addressable locations is 
to 65535, so in Hex they are 0000 to FFFF. 

To distinguish these numbers from base 10 the Hex numbers 
are usually prefixed with a dollar sign ($). For example, 7680 in 
decimal is $ 1 E00 in Hex. 

Addressing Modes 

There are various addressing modes that the 6510 uses. They 
will be explained now to avoid confusion later. 



Absolute Addressing 

This is the mode where a number is taken from a memory 
location for use by the processor. 

eg. 

LDA$1000 



Immediate Addressing 

This is the mode in which you load a number directly into a 
register. 

eg. 

LDA#$10 
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The hash ( f ) sign tells the assembler (program which converts 
assembly language into machine code) that this is a direct 
command. 

Zero Page Addressing 

This is an addressing mode that allows you to address locations 
to 255 (0 to F) only. The reason for this is speed. It is faster to 
go to a one byte number than a two byte number. 

Indexed Addressing 

This is the most useful mode in the 651 0. It allows the addition 
of a number to a base address to go to higher addresses, i.e. 
4096 + 250. It always involves the accumulator and the X or Y 
register. 

eg. 

LDA $ 1 E00,X (if X contained 1 2 then the address would be 
1E12) 

From now on I will work in Hex. I will refer to the accumulator as 
A, the X register as X and the Y register as Y. 

In order to enter the programs you will need an assembler or 
use the hexadecimal loader at the back of the book. You type 
the Hex numbers which are beside most of the programs into 
this loader and run/stop restore it to stop. Then type SYS (the 
starting address) to run your program. 

Machine Code Instructions 

The instructions will be covered in the following order: 

LDA Load A with memory or number. 
LDX Load X with memory or number. 
LDY Load Y with memory or number. 

STA Store number in memory location (from A). 
STX Store number in memory location (from X). 
STY Store number in memory location (from Y). 

TAY Transfer contents of A into Y. 
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TAX Transfer contents of A into X. 

TYA Transfer contents of Y into A. 

TXA Transfer contents of X into A. 

NOP No operation (used to reserve memory) . 

JMP Jump to address. 

JSR Jump to subroutine at address. 

RTS Return from subroutine. 

INC Increment (add one to) memory 

INX Increment value in X. 

INY Increment value in Y. 

DEC Decrement (subtract one from) memory. 

DEX Decrement value in X. 

D E Y Decrement val u e i n Y . 

CMP Compare A with memory/ number. 

CPX Compare X with memory/ number. 

CPY Compare Y with memory/number. 

BEQ Branch if value equal to. 
BNE Branch if value not equal to. 
BCC Branch if carry clear (less than) . 
BCS Branch if carry set (greater than) . 
BVC Branch if overflow. 
BVS Branch if no overflow. 
BPL Branch on plus. 
BMI Branch on minus. 
BRK Break (stop). 

PHA Put value in A onto stack. 
PHP Put processor statut onto stack. 
PLA Take top of stack and put in A. 
PLP Take processor status off stack. 
TXS Transfer X to stack pointer. 
TSX Transfer stack pointer to X. 

AND AND A with memory. 
ORA OR A with memory. 
EOR Exclusive OR A with memory. 
BIT Test bits with memory. 
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ADC 


Add mpmnrv to A w/ith rarrv 


SBC 


Subtract mpmnrv frnm A with rarrv 

v - » uwii uv/i iii^ii iui y 1 1 Ul 1 1 r \ Willi IsO 1 1 y ■ 


SEC 


Set carrv bit 

w wUI 1 y 1 1 ■ 


CLC 


Clear carry bit. 


SED 


Set decimal bit. 


CLD 


Clear decimal bit. 


SEI 


Set interrupt disable bit. 




Clear interrupt disable bit. 


RTI 


Return from interrunt rnutinp 


CLV 


Clear overflow bit. 


ROR 


Rotate memory one bit right. 


ROL 


Rotate memory one bit left. 


ASL 


Shift memory one bit left. 


LSR 


Shift memory right one bit. 



COMMAND 
HEX/DECIMAL 

LDA f $00 Loads the accumulator with hexademical 00. 
A9 169 



LDA $00 Loads the accumulator from zero page 

A5 165 location 00 (maximum FF). 

LDA$00,X Loads the accumulator from zero page 
B5 181 location (00 + X) (maximum FF). If X 

contained F0 then it would load from location 

00+F0=F0. 



LDA $0000 Loads accumulator from location 0000 

AD 173 (maximum FFFF). 

LDA $0000,X Loads A from location (0000 + X) (maximum 

BD 189 FFFF). If X contained FF then it would load 
from location 0000 + FF = 00FF. 

LDA $0000, Y Loads A from location (0000 + Y) (maximum 

B9 185 FFFF). If Y contained DE then it would load 
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from location 0000 + DE = 00DE. 

STA $00 Stores value in A in location 00 (maximum 

85 133 FF). 

STA$00,X Stores value in A in location (00 + X) 

95 149 (maximum FF). 

STA $0000 Stores the value of A in location 0000 

8D 141 (maximum FFFF). 

STA$0000,X Stores the value in A in location (0000 + X) 

9D 157 (maximum FFFF). 

STA $0000,Y Stores the value of A in location (0000 + Y) 

99 153 (maximum FFFF). 

STX $00 Stores the value in X in location 00 (maximum 
86 134 FF). 

STX $00, Y Stores the value in X in location (00 + Y) 
96 150 (maximum FF). 

STX $0000 Stores the value in X in location 0000 
8E 142 (maximum FFFF). 

STY $00 Stores the value in Y in location 00 (maximum 

84 132 FF). 

LDX #$00 Loads X with hexadecimal 00. 
A2 162 

LDX $00 Loads X with value in Hexadecimal 00. 

A6 166 (maximum FF). 

LDX $00, Y Loads X with value in 00 + Y (maximum FF). 
B6 182 

LDX $0000 Loads X with value in 0000 (maximum FFFF). 
AE 174 102 



LDX $0000,Y 
BE 190 



Loads X with value in 0000 + Y. 



LDY #$00 Load Y with hexadecimal 00. 
A0 160 

LDY $00 Load Y with value in 00 (maximum FF). 
A4 164 

LDY$00,X Load Y with value in location 00 + X 

B4 180 (maximum FF). 

LDY $0000 Load Y with value in 0000 (maximum FFFF) . 
AC 172 

LDY $0000, Y Load Y with value in 0000 + X (maximum 

BC 188 FFFF). 

STY$00,X Stores the value in Y in location (00 + X) 

94 148 (maximum FF). 

STY $0000 Stores the value in Y in location 0000 

8C 140 (maximum FFFF). 

TAY Transfers the contents of A into Y. 
A8 168 

TAX Transfers the contents of A into X. 
AA 170 

TYA Transfers the contents of Y into A. 
98 152 

TXA Transfers the contents of X into A. 
8A 138 

NOP No operation. This command is the 

EA 234 equivalent command to REM in BASIC in that 
it is passed by the processor. It is used to 
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reserve spaces in memory in case you want to 
insert instructions later. 

JMP$0000 Jumps to location 0000 (maximum FFFF). 
AC 76 Like GOTO in BASIC. 

JSR $0000 Jumps to a subroutine beginning at location 
20 32 0000 (maximum FFFF) and remembers where 

you came from. Like GOSUB in BASIC. 

RTS Returns from a subroutine. Similar to return 

60 96 in BASIC. 

INC $00 Increments (adds one to) the value in location 

E6 230 00 (maximum FF). If location 00 contained 47 
it would contain 48 after this command. 

INC $00,X Increments the value contained in location 
F6 246 (00 + X) (maximum FF). If X contained 0A 
then locaiton 00+0A would be incremented. 

INC $0000 Increments the value contained in location 
EE 238 0000 (maximum FFFF). 

INC $0000,X Increments the value contained in location 
FE 254 (0000 + X) (maximum FFFF). 

INX Increments the value contained in the X 

E8 132 register. 

INY Increments the value contained in the Y 

C8 200 register. 

DEC $00 Decrements (subtract by one) the value in 

C6 198 location 00 (maximum FF). 

DEC$00,X Decrements the value contained (00 + X) 
D6 214 (maximum FF). 
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DEC $0000 Decrements the value in 0000 (maximum 

CE 206 FFFF). 

CMP ft $00 Compares the value in 00 with the value in A 

C9 201 (maximum FF). For example IF A=1 in 
BASIC. 

CMP $00 Compares the value in 00 with the value in A 

C5 197 (maximum FF). 

CMP $00,X Compares the value in (00 + X) with the value 

D5 213 in A (maximum FF). 

CMP $0000 Compares the value in 0000 with the value in 

CD 205 A (maximum FFFF). 

CMP$0000,X Compares the value in (0000 + X) with the 

DD 221 value in A (maximum FFFF). 

CMP$0000,Y Compares the value in (0000 + Y) with the 

D9 217 value in A (maximum FFFF). 

CPX ft $00 Compares the value 00 with the value in X 

E0 224 (maximum FF). 

CPX $00 Compares the value in 00 with the value in X 

E4 228 (maximum FF). 

CPX $0000 Compares the value in 0000 with the value in 

EC 236 X (maximum FFFF). 

CPY ft $00 Compares the value 00 with the value in Y 

C0 192 (maximum FF). 

CPY $00 Compares the value in 00 with the value in Y 

C4 196 (maximum FF). 

CPY $0000 Compares the value in 0000 with the value in 

CC 204 Y (maximum FFFF). 
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BEQ $1 C1 B If the value compares (above) is equal to the 
F0 240 value then branch (ie GOTO address). You 
can jump 127 bytes forward and 128 bytes 
backward. So, in the example, the command 
is at address 1 C6B and it is told to branch 
back to 1 C1 B which is 101 (dec) backwards). 
The number after the 'S' sign has to be 
converted into a one byte decimal number by 
subtracting 1C1B from 1C6B (after 
converting to decimal). 

BNE $1C1B As above except that if value is not equal then 
D0 208 branch forward /back. 

BCC $1 C1 B Branches forward /backward if carry clear, ie 
90 1 44 if value is less than one checked for. Has same 
format as BEQ. 

BCS $1 C1 B Branches forward/backward on carry set, ie 
B0 176 if value is more then one checked for. Has 
same format as BEQ. 

BVC $1 C1 B Branches forward/backward if the overflow 
50 80 flag(V) is clear (V = 0). 

BVS $1 C1 B Branches forward /backward if the overflow 

70 112 flag is set (V = 1). 

BPL $1 C1 B Branches forward /backward if the N Flag (N) 

10 16 is clear (N = 0), ie result is plus. 

BMI $1 C1 B Branches forward/backward if the N flag is 
30 48 set (N = 1 ), ie result is minus. 

BRK Interrupt program. If returning to BASIC then 

00 the screen will clear and change to blue with a 

light blue border and characters. Same as 

after run/stop restore keys. 
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PHA Stores the value in A on top of the stack 

48 72 (storage pile 256 bytes long with 'last in-first 

out' working). 

PLA Takes the value off top of stack and puts it 

68 104 into A. 

PHP Stores the processor status at top of the 

08 8 stack. 

PLP Takes the processor status off top of the 

28 1 40 stack. 

TSX Transfers the stack pointer to X. 

BA 186 

TXS Transfers the value in X to the stack pointer. 

9A 154 

AND #$00 Performs a logical AND (same as in BASIC) 
25 41 with the value in A and Hex 00 and puts a new 

value in A. 

AND $00 Performs a logical AND with the value in A 

25 37 and the value in location 00 (maximum FF) 

and puts a new value in A. 

AND $00,X Performs a logical AND with the value in A 
35 53 and location 00 + X (maximum FF) and puts a 

new value in A. 

AND $0000 Performs a logical AND with the value in A 
2D 45 and location 0000 (maximum FFFF) and puts 
a new value in A. 

AND $0000,X Performs a logical AND with the value in A 
3D 61 and location 0000 + X (maximum FFFF) and 
puts a new value in A. 
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AND $0000,Y Performs a logical AND with the value in A 
39 57 and location 0000 + Y (maximum FFFF) and 

puts a new value in A. 

ORA f $00 Performs a logical OR (same as in BASIC) 
09 9 with the value in A and Hex 00 and puts a new 

value in A. 

ORA $00 Performs a logical OR with the value in A and 

05 5 the value in location 00 (maximum FF) and 

puts a new value in A. 

ORA $00,X Performs a logical OR with the value in A and 
15 21 the value in location 00 + X (maximum FF) 

and puts a new value in A. 

ORA $0000 Performs a logical OR with the value in A and 
0D 13 the value in location 0000 (maximum FFFF) 

and puts a new value in A. 

ORA $0000,X Performs a logical OR with the value in A and 
1D 29 the value in location 0000 + X (maximum 
FFFF) and puts a new value in A. 

ORA $0000, Y Performs a logical OR with the value in A and 
19 25 the value in location 0000 + Y (maximum 

FFFF) and puts a new value in A. 

EOR f$00 Performs an exclusive OR with the value in A 
49 73 and Hex 00 and stores the new value in A. An 

exclusive OR is similar to an OR except that if 
and only if one of the binary numbers has a 
one then a one will be passed on (not both). 

Value 1 10010011 
Value2 11100111 

Final 01 1 1 01 00 = 116 (decimal) 
EOR $00 Performs an exclusive OR with the value in A 
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45 69 



and the value in location 00 Hex and puts a 
new value in A (maximum FF). 



EOR $00,X Performs an exclusive OR with the value in A 
55 85 and the value in location 00 + X and puts a 
new value in A (maximum FF). 



EOR $0000 Performs an exclusive OR with the value in A 
4D 77 and the value in location 0000 (Hex) and puts 
a new value in A (maximum FFFF). 



EOR $0000,X Performs an exclusive OR with the value in A 
5D 93 and the value in location 0000 + X and puts a 
new value in A (maximum FFFF). 



EOR $0000,Y Performs an exclusive OR on the value in A 
59 89 and the value in location 0000 + Y and puts 
the new value in A (maximum FFFF). 



BIT $00 Tests (by performing a logical AND) the value 

24 36 in A with the value in location 00(hex) 

(maximum FF) but leaves the value in A 
intact. Changes the values in flags. If A AND 
memory = then the Z flag is set to one 
otherwise zero. 



BIT $0000 Tests the value in A with the value in 0000 
2C 44 (Hex) (maximum FFFF) and adjusts the flags 
accordingly (as above). 

ADC #$00 Takes the value in A and adds it to Hex 00 and 
69 1 05 puts the new value in A. (If the value exceeds 
255 (FF) then A will contain the value - 255. 

ADC $00 Takes the value in A and adds it to the value in 

65 101 location 00(Hex) (maximum FF) and puts the 
new value in A. 

ADC $00,X Takes the value in A and adds it to the value in 
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75 117 



Hex 00 + X (maximum FF) and puts the new 
value in A. 



ADC $0000 Takes the value in A and adds it to the value in 
6D 109 location 0000(maximum FFFF^and puts new 
value in A. 



ADC $0000,X Takes the value in A and adds it to the value in 
7D 125 location 0000 + X (maximum FFFF) and puts 
the new value in A. 



ADC $0000, Y Takes the value in A and adds it to the value in 
79 121 Hex 0000 + Y (maximum FFFF) and puts the 
new value in A. 



SBC #$00 Takes the value in A and subtracts Hex 00 
E9 233 from it and puts the new value in A. 

SBC $00 Takes the value in A and subtracts the value in 

E5 229 location 00 from it (maximum FF) and puts 
the new value in A. 



SBC $00,X Takes the value in A and subtracts the value in 
F5 245 location 00 + X (maximum FF) from it and 
puts new value in A. 

SBC $0000 Takes the value in A and subtracts the value in 
ED 237 location 0000 (maximum FFFF) from it and 
puts the new value in A. 

SBC $0000,X Take the value in A and subtracts the value in 
FD 253 location 0000 + X (maximum FFFF) from it 
and puts the new value in A. 

SBC $0000,Y Takes the value in A and subtracts the value in 
F9 249 location 0000 + Y (maximum FFFF) from it 
and puts the new value in A. 
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SEC Sets the carry flag, ie puts the carry flag to one 

38 56 (C = 1). 

CLC Clears the carry flag, ie puts the carry flag to 

value zero (C = 0). 

SED Sets the decimal mode, ie puts the D flag 

F8 248 equal 

to one(D=1). 

CLD Clears the decimal mode, ie puts the D flag 

D8 216 equal to zero (D = 0). 

SEI Sets the interrupt disable status and turns off 

78 120 all unnecessary interrupts (1 = 1) — see the 
interrupts section. 

CLI Clears the interrupt disable status, ie turns of 

58 88 all the interrupts again — see the interrupts 

section. 

RTI Returns from an interrupt. Used instead of 

40 64 RTS when returning from an interrupt. 

CLV Clears the overflow flag (V = 0). 

B8 184 

ROR Rotates the bits in the accumulator right by 

6 A 106 one bit: 

C7654321 

So: 10000001 
would become: 1 1000000 

ROR $00 Rotates the bits of location 00(Hex) 

66 1 02 (maximum FF) right by one bit. 

ROR $00,X Rotates the bits of location 00 + X (maximum 
76 118 FF) right by one bit. 
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ROR $0000 
6E 110 



Rotates the bits of location 0000 (maximum 
FFFF) right by one bit. 



ROR$0000,X Rotates the bits of location 0000 + X 
7E 126 (maximum FFFF) right by one bit. 

ROL Rotates the bits in the accumulator left by one 

2A 42 bit: 

76543210 C 

So: 10000001 
would become: 0000001 1 

ROL $00 Rotates the bits of location 00(Hex) 

26 38 (maximum FF) left by one bit. 

ROL $00,X Rotates the bits of location 00 + X (maximum 

36 54 FF) left by one bit. 

ROL $0000 Rotates the bits in location 0000 (maximum 

2E 46 FFFF) left by one bit. 

ROL$0000,X Rotates the bits in location 0000 + X 

3E 62 (maximum FFFF) left by one bit. 

ASL Shifts the contents of A left by one bit and 

0A 1 puts the bit knocked off onto carry and puts a 

zero in at the right. 

C 76543210 

11000001 
would goto: 10000010 

ASL $00 Shifts the contents of 00 (maximum FF) left 

06 6 by one bit and puts a zero on at the right. 

ASL $00,X Shifts the contents of 00 + X (maximum FF) 
1 6 22 left by one bit and puts a zero on at the right. 
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ASL $0000 Shift the contents of location 0000 (maximum 
03 14 FFFF) left by one bit and puts a zero on at the 

right. 

ASL $0000,X Shifts the contents of location 0000 + X left 
1E 30 by one and puts a zero on at the right 

(maximum FFFF). 

LSR Shifts the contents of A right by one bit and 

4A 74 puts a zero on at the left and puts the bit 
knocked off onto carry. 

76543210 C 

eg. 100000001 C 

would be: 01000000 

LSR $00 Shifts the contents of location 00 right by one 

46 70 bit and puts a zero on at the left (maximum 

FF). 



LSR $00, X Shifts the contents of location 00 + X 
56 86 (maximum FF) right by one bit and puts a 

zero on at the left. 

LSR $0000 Shifts the contents of location 000(5 
4E 78 (maximum FFFF) right by one bit and puts a 

zero on at the left. 

LSR $0000,X Shifts the contents of location 0000 + X right 
5E 94 by one bit and puts a zero on at the left 
(maximum FFFF). 



CONVERTING ASSEMBLY LANGUAGE TO MACHINE 
CODE 

As assembly language is far easier to use than machine code, if 
you don't have an assembler you should write assembly 
language programs and change them into Hex for entering with 
the Hex loader at the back of the book. This is how to do 
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the conversion and how to start or stop your machine code 
programs. 

In the table (at the beginning of section 2.1) I gave the 
assembly language form, and its Hex and decimal equivalent. 
These numbers are the value for the mnemonic (three letter 
word),, the operand ( f $ 00, for example, has to be 
calculated. The following will deal with hex numbers. If the 
operand goes up to FF then it will occupy one byte so you just 
keep the operand to POKE directly into memory (or using the 
Hex loader). But if it goes up to FFFF then it is a two byte 
operand and has a different format. The 6510 works in low 
byte/high byte order. The low byte of the two byte address is 
the second two Hex digits and the high byte is the first two. 

eg. 

To change LDA $ 01 FE into machine code: 

The value for LDA$ is AD (or 173), the second two Hex digits 
are FE and the first two are 01 . So you enter the numbers into 
the Hex loader in the order AD,FE,01. (Or POKE into 
memory 173, 254, 1). 

In the following sections, the programs are listed in assembly 
language and in a Hex dump. This is a list of the Hex numbers 
to enter into the loader. You only enter the first two byte 
number as it is the starting address, then you enter all the Hex 
numbers. 

To start the assembly language programs type G starting 
address into your assembler or SYS starting address. To start 
the Hex dump versions type SYS starting address. For 
example to start either program (starting address is 7168) 

SYS 7168 
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SECTION 2.2 



COLOUR IN MACHINE CODE 

In matching code there are three ways of colouring characters: 

1 . Put the colour value into the accumulator and transfer it to 
location 646 (as in BASIC). 

eg. 

To make characters orange: 



1C00 A9 0B LDA *$0B 

1C02 8D 86 02 STA $0286 
1C05 60 RTS 



2. Put CHR$ (value for the colour - see Appendix 4) into the 
accumulator and then JSR to the PRINT subroutine at location 
65490 (FFD2 6 ). 

eg. 

To make the characters orange: 

1C00 A3 31 LDA #$31 

1C02 20 D2 FF JSR $FFD2 
1C05 60 RTS 



3. To colour individual characters on the screen (like POKEing 
colour) character by character. 

eg. 

To colour the top line of the screen orange: 
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1C00 A3 08 
1C02 A2 00 
1C04 3D 00 D8 
1C07 E8 
1C08 E0 28 
1C0A D0 F8 
1C0C 60 



LDA #*08 
LDX #*00 
STA $D800,X 
I NX 

CPX **28 
BNE $1C04 
RTS 



The screen and border colours are controlled in the same way as 
they are in BASIC, by using locations 53280 and 53281 . 

eg. 

To change the screen colour to black: 

1C00 A3 00 LDA **00 

1C02 8D 21 D0 STA *D021 
1C05 60 RTS 



Or to change the border to red: 

1C00 A3 02 LDA #$02 

1C02 80 20 D0 STA *D020 
1C05 60 RTS 
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SECTION 2.3 



SOUND IN MACHINE CODE 

Sound will not be covered in such depth as in the BASIC 
section as all the values and tables and POKEs are identical, and 
they have already been covered. 

To produce sound in machine code you load the accumulator 
(or the X or the Y register) with the value for the waveform, note 
low or high frequency, attack/decay, etc. Then you store this 
value in the respective register. 



In machine code sound needs a delay loop to make the sound 
slow enough to sound correct. 

The following routine has a sound effect (a red alert) without a 
delay, and the second one is the same with a delay: 



eg. 

To create a sawtooth waveform on voice 1 : 



1C00 A9 21 
1C02 8D 04 D4 
1C05 60 



LDA »$21 
STA *D404 
RTS 



1C00 A9 21 

1C02 8D 04 D4 

1C05 A9 80 

1C07 8D 05 D4 

1C0A 8D 06 D4 

1C0D A9 0A 

1C0F 8D 18 D4 

1C12 A2 E6 



LDA *t21 
STA *D404 
LDA *$80 
STA *D405 
STA *D406 
LDA «$0A 
STA $D418 
LDX #iE6 
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1C14 8D 00 D4 
1C17 8E 01 D4 
1C1A CA 
1C1B E0 64 
1C1D D0 F5 



STA $D400 
STX *D401 
DEX 



CPX »*64 
BNE *1C14 



1C1F 4C 12 1C JMP *1C12 

For those without an assembler, use the Hex loader at the back 
of the book and type in the following numbers (the first is the 
Hex starting address): 



Bx 

PC SR AC XR YR St 
,;97FE 32 00 00 00 F6 

°:1C00 A9 21 8D 04 D4 A9 80 8D 
„:1C08 05 04 8D 06 D4 A9 0A 8D 
.:1C10 18 D4 A2 E6 8D 00 D4 8E 
.:1C18 01 D4 CA E0 64 D0 F5 4C 
.:1C20 12 1C 59 00 00 00 00 00 



1C00 


A9 


21 




LDA 


«$21 


1C02 


8D 


04 


D4 


STA 


$D404 


1C05 


A9 


80 




LDA 


*$80 


1C07 


8D 


05 


D4 


STA 


$D405 


1C0A 


8D 


06 


D4 


STA 


*D406 


1C0D 


A9 


0A 




LDA 


«$0A 


1C0F 


8D 


18 


D4 


STA 


$D418 


1C12 


A2 


E6 




LDX 


**E6 


1C14 


8E 


00 


D4 


STX 


*D400 


1C17 


8E 


01 


D4 


STX 


*D401 


1C1A 


CA 






DEX 




1C1B 


20 


30 


1C 


JSR 


*1C30 


1C1E 


E0 


64 




CPX 


#*64 


1C20 


D0 


F5 




BNE 


♦ 1C17 


1C22 


A9 


00 




LDA 


»*00 


1C24 


8D 


00 


D4 


STA 


$D400 


1C27 


8D 


01 


D4 


STA 


$D401 
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1C2A 20 30 1C JSR *1C30 

1C2D 4C 12 1C J MP ilC12 

1C30 A0 00 LDY #$00 

1C32 C8 I NY 

1C33 D0 FD BNE *1C32 

1C35 60 RTS 



And here are the Hex numbers: 



B* 

PC SR AC XR 
.;97FE 32 00 00 

.S1C00 A9 21 8D 
.: 1C08 05 04 8D 
-:1C10 18 D4 A2 
.: 1C18 01 D4 CA 
.:1C20 D0 F5 A9 
.:1C28 01 D4 20 
.:1C30 m 00 C8 



YR 


S* 








00 


F6 








04 


D4 


A9 


80 


8D 


06 


D4 


A9 


0A 


8D 


E6 


8E 


00 


D4 


8E 


20 


30 


1C 


E0 


64 


00 


8D 


00 


D4 


8D 


30 


1C 


4C 


12 


1C 


D0 


FD 


60 


50 


31 



The above routine forms the basis for all sound effects in 
machine code. 

To play tunes, instead of using data statements, you POKE the 
notes into a spare part of memory and LDA $ value, X for the 
tune. 

The following program uses this method to play a scale. The 
first part of the program is in BASIC and it POKEs the note 
values into memory. 



10 FORA=0TO16: READB: P0KE832+A.B: NEXT 
20 SYS7168 

30 DATA 75,34,126,38,52,43,1-98.45,97,51, 
172,57,188,64,149,68,0,0 
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PC SR AC XR YR St 
,;97FE 32 00 00 00 F6 



1C00 


A9 


21 




LUR 


1 


1C02 


8D 


04 


o a 

D4 


OTA 

b 1 R 


*Unk3^ 


1C05 


A3 


80 




LUR 


4+ d: <DOl 


1C07 


8D 


05 


D4 


b I R 




1C0A 


8D 


0b 


U4 


b 1 n 




1C0D 


A9 


0A 




LUR 




1C0F 


8D 


18 


D4 


f~* T /S 

b 1 A 


>U4 1 o 


1C12 


A2 


00 




LUX 




1C14 


BD 


3C 


03 


LUA 


»k3 J jL , A 


1C17 


8D 


00 


U4 


b I A 




1C1A 


BD 


3D 


03 


LUA 


<t noon v 
J JU , A 


1C1D 


8D 


01 


o /i 

D4 


b 1 A 


^U'i-ld 1 


1C20 


20 


2C 


1C 


JbK 


> i POP 

* 1 L/:L 


1C23 


E8 






INX 




1C24 


E8 






INX 




1C25 


E0 


14 




CPX 


4+ dr 1 /I 
#$ 1 4 


1C27 


D0 


EB 




BNE 


d- 1 P* 1 A 


1C29 


4C 


12 


1C 


J PIP 


$1L1Z 


1C2C 


8A 






TUA 

TXA 




1C2D 


48 






OI ! /\ 

PHA 




1C2E 


A2 


00 




LDX 


#$.00 


1C30 


A3 


00 




LDY 


»*00 


1C32 


C8 






INY 




1C33 


D0 


FD 




BNE 


<fclC32 


1C35 


E8 






I NX 




1C36 


D0 


FA 




BNE 


*1C32 


1C38 


68 






PLA 




1C39 


AA 






TAX 




1C3A 


60 






RTS 





And here is the Hex dump for the program: 



„;1C00 A9 21 8D 04 D4 A9 80 8D 
o slC08 05 D4 8D 06 D4 A9 0A 8D 
.:1C10 18 D4 A2 00 BD 3C 03 8D 
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.: 1C18 00 D4 BD 

.: 1C20 20 2C 1C 

.: 1C28 EB 4C 12 

.J 1C30 A0 00 C8 

.: 1C38 68 AA 60 



3D 03 8D 01 D4 
E8 E8 E0 14 D0 
1C 8A 48 A2 00 
D0 FD E8 D0 FA 
41 00 85 08 00 
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SECTION 2.4 



ANIMATION IN MACHINE CODE 

The principles in animation are basically the same as in BASIC. 
When you are moving a character you must erase its previous 
position before moving to a new one. However, in machine 
code you need to slow the action down to see it. For example, 
to move a ball across the screen in BASIC: 



10 POKE1024+X ,81 : P0KE55296+X , 1 : X=X+1 : POK 
E1023+X ,32: IFX=40THENEND 
20 GOTO 10 

Would be the following in machine code: 



5 X=0 



1C00 
1C02 
1C04 
1C07 
1C09 
1C0C 
1C0E 

icil 

1C12 
1C14 
1C16 



E0 28 
D0 EC 
60 



A2 00 
A9 51 
3D 00 
A9 01 
9D m 
A9 20 
3D FF 
E8 



□8 



03 



04 



lDX 
LDA 
STA 
LDA 
STA 
LDA 
STA 
I NX 
CPX 
BNE 
RTS 



#$28 
$1C02 



$0400, X 

#$01 

$D800,X 

#$20 

$03FF,X 



#$00 
#$51 



And here is the Hex dump: 



„:1C00 A2 00 A9 51 9D 00 04 A9 
.:1C08 01 9D 90 D8 A9 20 9D FF 
.:1C10 03 E8 E0 28 D0 EC 60 8D 
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However, you would need to slow this routine down as it is too 
fast to see. You would need a routine like this: 



1C17 A2 00 LDX #$00 

1C19 A0 00 LDY »*00 

1C1B C8 INY 

1C1C D0 FD BNE *1C1B 

1C1E E8 INX 

1C1F D0 FA BNE ilClB 

1C21 60 RTS 

And here is the hex dump: 

".:1C17 A2 00 A0 00 C8 D0 FD E8 
.:1C1F D0 FA 60 1C E8 E8 E0 14 

The main routine uses the X register as well as the delay so we 
need to store its value on the stack thus: 



1C17 


8A 




TXA 




1C18 


48 




PHA 




1C19 


A2 


00 


LDX 


*t*00 


1C1B 


A0 


00 


LDY 


»*00 


1C1D 


C8 




INY 




1C1E 


D0 


FD 


BNE 


*1C1D 


1C20 


E8 




INX 




1C21 


D0 


F8 


BNE 


*1C1B 


1C23 


68 




PLA 




1C24 


AA 




TAX 




1C25 


60 




RTS 





.:1C17 8A 48 A2 00 A0 00 C8 D0 
.: 1C1F FD E8 D0 F8 53 AA 60 14 

So the completed routine looks like this: 

1C00 A2 00 LDX #$00 

1C02 A3 51 LDA »*51 
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1C04 


9D 


00 


04 


9TA 

JIM 


<t0400 X 

•K KJ ~ KJ KJ * r > 


1C07 


A9 


01 

C X 




i nA 

1 — LJ 1 1 


#401 


1C09 

X \^KJ o 




00 


LJ KJ 


<> t n 




1C0C 


A9 

1 1 -J 


7P) 

KJ 




i DA 

1 — LJ t 1 




1C0F 


9D 


FF 


09 

KJ v-> 


9TA 

•Jill 




1C1 1 


F8 

l_ . \-J 






TNX 

X 1 in 




1C12 

1 O X 


20 

4C_ CJ 


1 A 

J. 1 1 


1 r 


1 9R 


m x \-f x n 


1C1 5 

X O X nJ 


F0 


28 

£~ \J 




rpx 




i n 7 


LJ O 


F9 




RNF 


X Ot/Z. 


in 9 

x o x o 








In 1 J 




in a 

J.L.J, 1 1 


RA 






TXA 




i n r 


4R 










in r 

X 1— - X o 


A2 


00 

KJ KJ 




i DX 


•w 4? KJ KJ 


1C1F 

X O X 1_. 


A0 

1 1 KJ 


00 

«CJ CJ 




lDY 

L_ LJ t 




1C20 








TNY 

ill 1 




i r? 1 


UKJ 


FD 




RNF 


PlL-tu 


1C23 


E8 






INX 




1C24 


D0 


FA 




BNE 


*1C20 


1C26 


68 






PLA 




1C27 


AA 






TAX 




1C28 


60 






RTS 





: 1C00 


A2 


00 


A9 


51 


9D 


00 


04 


A9 


: 1C08 


01 


3D 


00 


D9 


A3 


20 


3D 


FF 


: 1C10 


03 


E8 


20 


1A 


1C 


E0 


28 


D0 


: 1C18 


E9 


60 


8A 


48 


A2 


00 


A0 


00 


: 1C20 


C8 


D0 


FD 


E8 


D0 


FA 


68 


AA 


: 1C28 


60 


00 


00 


00 


00 


00 


00 


00 



To start type SYS START. If this seems slow for machine code 
remember that the computer is counting to 65536 every time it 
moves the ball (as a delay). Imagine that in BASIC — it would 
take hours. 

Animation, therefore, depends on indexed (or added to) 
addressing. 
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But we now come upon a problem. If we can only add 255 to 
our base (STA $, for example) how do we cover the whole 
screen as it is 1 ,000 locations in length? 

Well, there are two ways. One is to actually change the program 
as it is running; and the other is to have different loops to add up 
to 1,000. For the first method to move a ball through every 
location we would need the following routine: 



1C00 


A2 


00 




LDX 


#$00 


1C02 


A9 


81 




LDA 


#$81 


1C04 


9D 


00 


04 


STA 


$0400, X 


1C07 


A9 


20 




LDA 


#$20 


1C09 


9D 


FF 


03 


STA 


$03FF,X 


1C0C 


E8 






I NX 




1C0D 


D0 


F3 




BNE 


$1C02 


1C0F 


AC 


06 


IC 


LDY 


$1C06 


1C12 


C8 






INY 




1C13 


8D 


06 


IC 


STA 


$1C06 


1C16 


AC 


0B 


IC 


LDY 


$1C0B 


1C19 


C8 






INY 




1C1A 


8C 


0B 


IC 


STY 


$1C0B 


1C1D 


C0 


07 




CPY 


#$07 


1C1F 


D0 


El 




BNE 


$1C02 


1C21 


60 






RTS 





.: 1C00 


A2 


00 


A9 


81 


9D 


00 


04 


A9 


.: 1C08 


20 


9D 


FF 


03 


E8 


D0 


F3 


AC 


.: 1C10 


06 


IC 


C8 


8D 


06 


IC 


AC 


0B 


.: 1C18 


IC 


C8 


8C 


0B 


IC 


C0 


07 


D0 


.: 1C20 


El 


60 


FD 


E8 


D0 


FA 


68 


AA 



The second method would be: 



1C00 A2 00 

1C02 A9 81 

1C04 9D 00 04 

1C07 A9 01 



LDX #$00 
LDA #$81 
STA $0400, X 
LDA #$01 
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1 peso 

i Lwy 


nn 

yu 


OlOl 


no 
Do 


b 1 n 


<tno.c*ct v 
j>Uok3k) , A 


i pcip 
1 LkJL 


co 
to 






T MV 

1 ISA 




1 LWU 




rn 

r j 




PMC 
DISC 


<t 1 PCIO 


1 Lfcar 








i n£* 
LUn 


W*0 1 


lull 


on 

yu 


CC 

r r 




b 1 n 


»k3'+r r , A 


1 LI 4 


AQ 


Ol 1 
KJ 1 




i n^ 
LUn 




1 p 1 r 
1 LID 


on 

yu 


CC 

r r 


no 
Uo 


OTA 

b 1 n 


»Uor r , A 


1 PI Q 

1 L 1 3 


CO 

to 






T MV 
1 ISA 




1 L 1 r) 


npa 


r o 




DktC 
DlSt 


<t 1 PGIC 
* J. Lkar 


1 p 1 p 
1 L 1 L 


riy 


ol 




LUn 




1 LI h 


yu 


r — r~ 

r L 


fe3D 


b 1 n 


<+ fierce V 

>fe3Dr L , A 


1 Lz: 1 


no 


w 1 




LUn 




1 Lz J 


on 

yu 


cc 
r t 


no 

uy 


b 1 n 


»uyr t , A 


1 LzD 


CO 

ho 






T MV 

1 ISA 




1 Lz/ 


UeJ 


CO 

r o 




PMC 


* 1 p 1 p 


1 LZ3 


AQ 

ny 


Q 1 

o 1 




LUn 


4*4.0 1 
**T>t5 J. 


1 POD 

1 Lzb 


on 

yu 


cn 
r U 




b 1 n 


<tciRcn v 


1C2E 


R9 


01 




LDA 


#i01 


1C30 


9D 


FD 


DA 


STn 


tDAFD.X 


1C33 


E8 






I NX 




1C34 


D0 


F3 




BNE 


*1C29 


1C36 


60 






RTS 





And here is the Hex dump: 

.S1C00 A2 00 A9 81 9D 00 04 n9 

.:1C08 01 9D 00 D8 E8 D0 F3 A9 

.:1C10 81 9D FF 04 f=)9 01 9D FF 

.:1C18 D8 E8 D0 F3 A9 81 9D FE 

»:1C20 05 A9 01 9D FE D9 E8 D0 

.:1C28 F3 A9 81 9D FD 06 A9 01 

.:1C30 9D FD Dn E8 D0 F3 60 00 

As you can see, the first method is far more efficient. However, 
if the program is to be stored on a ROM cartridge then the 
second method would have to be used. 

If you want user interaction, ie movement because of a joystick 
or keyboard input, you would load the accumulator with the 
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respective address (197 for keyboard) and compare this with 
the various numbers and then jump to the respective routine. 

eg. 

The following program moves a character left and right along 
the bottom line of the screen according to keyboard input. The 
'T key moves the character left and the 'M' key moves it right. 



1C00 


A2 


14 




LDX 


#$14 


1C02 


A0 


14 




LDY 


#$14 


1C04 


AD 


C5 


00 


LDA 


$00C5 


1C07 


C9 


24 




CMP 


#$24 


1C09 


F0 


05 




BEQ 


$1C10 


1C0B 


C9 


0C 




CMP 


#$0C 


1C0D 


F0 


09 




BEQ 


$1C18 


1C0F 


60 






RTS 




1C10 


E0 


27 




CPX 


#$27 


1C12 


F0 


FB 




BEQ 


$1C0F 


1C14 


E8 






INX 




1C15 


4C 


23 


1C 


JMP 


$1C23 


1C18 


E0 


00 




CPX 


#$00 


1C1A 


F0 


F3 




BEQ 


$1C0F 


1C1C 


CA 






□EX 




1C1D 


4C 


23 


1C 


JUP 


$1C23 


1C20 


4C 


0F 


1C 


J HP 


$1C0F 


1C23 


A9 


01 




LDA 


#$01 


1C25 


9D 


C0 


07 


STA 


$07C0 ,X 


1C28 


9D 


C0 


DB 


STA 


$DBC0,X 


1C2B 


CA 






DEX 




1C2C 


A9 


20 




LDA 


#$20 


1C2E 


9D 


C0 


07 


STA 


$07C0,X 


1C31 


E8 






INX 




1C32 


E8 






INX 




1C33 


9D 


C0 


07 


STA 


$07C0 ,X 


1C36 


CA 






DEX 




1C37 


4C 


0F 


1C 


JMP 


$1C0F 



.UC00 A2 14 A0 14 AD C5 00 C9 
.:1C08 24 F0 05 C9 0C F0 09 60 
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.: 1C10 E0 27 F0 FB E8 4C 23 1C 

,:1C18 E0 00 F0 F3 CA 4C 23 1C 

.:1C20 4C 0F 1C A9 01 9D C0 07 

.:1C28 9D C0 DB CA A9 20 9D C0 

.:1C30 07 E8 E8 9D C0 07 CA 4C 

.2 1C38 0F 1C 00 00 00 00 00 00 

Rather than making the above program run so fast that you 
cannot see, it will jump to it from BASIC. 

10 SYS7168 

20 SYS7172: GOTO20 

Line 10 sets up the registers and line 20 goes to the machine 
code until you press RUN/STOP. 

If you follow the rules of animation in B AS IC and translate them 
to machine code you can write machine code animation 
without any problems. 

If your program does not work first time don't worry, few 
machine code programs work first time. Check it again and 
change anything that you see necessary, and you will 
eventually succeed. 
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SECTION 2.5 



PROGRAMMABE CHARACTERS IN MACHINE CODE 

It is not practicable to create these characters in machine code 
as it would require a minimum of 40 bytes to create over and 
above the eight bytes needed to store them. However, the 
occasional one could be created by the following method: 
LDA row 1 value 

STA 8192 + rowl + (character code*8) ' 
LDA row 2 value 



to row 7. 



The second method would involve indexed addressing {i 
adding to) as in the following example: 



1C00 


A2 


00 




LDX 


*$00 


1C02 


BD 


00 


10 




$1000, X 


1C05 


9D 


00 


20 


STA 


$2000, X 


1C08 


E8 






I NX 


1C09 


E0 


07 




CPX 


#$07 


1C0B 


D0 


F5 




BNE 


$1C02 


1C0D 


60 






RTS 





The above routine would require the data for the '@' already 
stored in locations 1 000 to 1 007 Hex. 

However, using programmable characters in machine code is 
very useful. In animation, all you do is write a program which 
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uses normal characters and then program the characters that 
you want. Have the first part of your program as follows: 

i_DA **24 
ST A *D818 

This puts the computer into the programmed character mode. 
Your program will still run normally and PEEKing the characters 
still gives the same results, but it looks much better for you. 

If you want the full character set copied into RAM rather than 
POKE each character into RAM, you could use the following 



routine: 



1C00 78 



1C01 A5 01 LDA *B1 

1C03 29 FB AND #*FB 

1C05 85 01 STA *01 

1C07 (=12 00 LDX **00 



1C09 BD 00 D0 LDA *D000,X 
1C0C 9D 00 20 ST A *2000,X 




1C12 BD hh Lun won ,o 

1C15 9D FF 20 STA *28FF ,X 






1C1D 09 04 ORA **04 

1C1F 85 01 STA $01 

1C21 58 CLI 



1C22 A9 18 LDA **18 

1C24 8D 18 D0 STA $D018 
1C27 60 RTS 



: 1C18 E8 D0 F7 AS w\ at oj 
'.: 1C20 01 58 A9 18 8D 18 D0 60 
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You will notice that the cursor looks odd. This is because only 
the first 64 characters have been re-programmed. 

The first four lines and the last four lines are for paging out the 
ROM as it is 'hidden' behind the I/O. The first four page the 
character ROM in the last four page it out. (Not the RTS.) 

To get multicolour characters you simply create the characters 
in BASIC (as you would do in BASIC) and then POKE the 
values of the colours as in BASIC into locations 53282 and 
53283 (plus the character colour). 

The following program changes the colours of the characters to 
red, white and orange: 



1C00 A9 98 LDA #*98 

1C02 8D 16 D0 STA *D016 

1C05 A9 08 LDA #$08 

1C07 8D 86 02 STA $0286 

1C0A A9 02 LDA tt$02 

1C0C 8D 22 D0 STA $D022 

1C0F A9 01 LDA *<J01 

1C11 8D 23 D0 STA <*>D023 

1C14 60 RTS 



.:1C00 A9 98 8D 16 D0 A9 08 8D 
.:1C08 86 02 A9 02 8D 22 D0 A9 
.:1C10 01 8D 23 D0 60 9D FF 20 

This program also puts the 64 into multicolour mode. 
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SECTION 2.6 



SPRITES IN MACHINE CODE 

Using sprites in machine code is identical to using them in 
BASIC. It is easier to create them in BASIC but they can still be 
saved and used as part of a machine code program. 

eg. 

Instead of typing POKE V + 21 ,4 type: 

1C00 A9 04 L.DA **04 

1C02 8D 15 D0 STA *D015 
1C05 60 RTS 

The following programs move a sprite over the bottom of the 
screen. The sprite will be a square block. The programs will 
show you that all you do to literally convert the POKEs to LDAs 
and STAs. 

10 FORA=0TO62: P0KE832+A ,255: NEXT 

20 P0KE53269,4 :POKE2042,13 

30 IFPEEKC197D=4THEN100 

40 IFPEEKC197D=3THEN200 

50 IFPEEKC197D=10THEN300 

60 IFPEEKC197D=18THEN400 

70 GOTO30 

100 IFPEEKC53253:>46THENY=Y-1 
110 PQKE53253,Y 
120 GOTO70 

200 IFPEEKC53253K225THENY=Y+1 
210 P0KE53253,Y 
220 GOTO70 

300 I FPEEK C 53252 D >30ANDPEEK C 53264 ] =0THEN 
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X - X — 1 " GOTO310 

305 IFPEEKC53264 ]=4ftNDPEEKC53252 D>0THENX 

307 IFPEEKC53264 3=4ftNDPEEKC53253 D=0THENP 
OKE53264,0:X=255 
310 P0KE53252,X 
320 GOTO70 

400 IFPEEKC53252K255THENX=X+1 

410 IFPEEKC53252 D-255THENP0KE53264 ,4: X=0 

420 IFPEEKC53264 3=4ANDPEEKC53252 3=70THEN 

440 

430 P0KE53252.X 
440 GOTO70 

And in machine code. 

Use the BASIC program to run this machine code. If you type 
RUN 20 then you will see the speed of machine code. 

1 FORft=0TO62: P0KE832+A ,255: NEXT: POKE2042 
,13:P0KE53269,4 
10 SYS7168*.GOTO10 
20 SYS7152 

1BF0 20 00 1C 
1BF3 4C F0 IB 
1BF6 Eft 
1BF7 Eft 
1BF8 Eft 
1BF9 Eft 
lBFft Eft 
1BFB Eft 
1BFC Eft 

1BFD 4C ft9 1C 

1C00 A5 C5 

1C02 C9 40 

1C04 F0 14 

1C06 C9 12 

1C08 F0 11 



JSR 


♦ 1C00 


j hp 


*1BF0 


NOP 




NOP 




NOP 




NOP 




NOP 




NOP 




NOP 




J MP 


$lCft9 


LDft 


$C5 


CMP 


»$40 


BEQ 


$lClft 


CUP 


#$12 


BEQ 


*1C1B 
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1C0A 


C9 


0A 




CMP 


#$0A 


1C0C 


F0 


46 




BEQ 


$1C54 


1C0E 


C9 


04 




cup 


#$04 


1C10 


F0 


7B 




BEQ 


$1C8D 


1C12 


C9 


03 




CI1P 


#$03 


1C14 


F0 


E7 




BEQ 


$1BFD 


1C16 


C9 


0D 




CMP 


#$0D 


1C18 


F0 


79 




BEQ 


$1C93 


1C1A 


60 






RTS 




1C1B 


A8 






TAY 




1C1C 


AD 


10 


D0 


LDA 


$D010 


1C1F 


29 


04 




AND 


#$04 


1C21 


C9 


04 




CMP 


#$04 


1C23 


F0 


0F 




BEQ 


$1C34 


1C25 


AE 


04 


D0 


LDX 


$D004 


1C28 


E0 


FF 




CPX 


#$FF 


1C2A 


F0 


17 




BEQ 


$1C43 


1C2C 


E8 






I NX 




1C2D 


8E 


04 


D0 


STX 


$D004 


1C30 


98 






TYA 




1C31 


4C 


16 


1C 


JMP 


*1C16 


1C34 


BE 


04 


D0 


LDX 


$D004 


1C37 


E0 


3F 




CPX 


#$3F 


1C39 


F0 


04 




BEQ 


$1C3F 


1C3B 


E8 






INX 




1C3C 


8E 


04 


D0 


STX 


$D004 


1C3F 


98 






TYA 




1C40 


4C 


16 


1C 


JMP 


$1C16 


1C43 


AD 


10 


D0 


LDA 


$D010 


1C46 


09 


04 




ORA 


#$04 


1C48 


8D 


10 


D0 


STA 


$D010 


1C4B 


A2 


00 




LDX 


#$00 


1C4D 


8E 


04 


D0 


STX 


$D004 


1C50 


98 






TYA 




1C51 


4C 


16 


1C 


JMP 


$1C16 


1C54 


A8 






TAY 




1C55 


AD 


10 


D0 


LDA 


$P010 


1C58 


29 


04 




AND 


#$84 


1C5A 


C9 


04 




CMP 


#$04 


1C5C 


F0 


0F 




BEQ 


$1C6D 
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1C5E AE 04 D0 
1C61 E0 16 
1C63 F0 04 
1C65 CA 
1C66 8E 04 D0 
1C69 98 
1C6A 4C 16 1C 
1C6D AE 04 D0 
1C70 E0 00 
1C72 F0 08 
1C74 CA 
1C75 8E 04 D0 
1C78 98 
1C79 4C 16 1C 
1C7C AD 10 D0 
1C7F 29 FB 
1C81 8D 10 D0 
1C84 A2 FF 
1C86 8E 04 D0 
1C89 98 
1C8A 4C 16 1C 
1C8D AE 05 D0 
1C90 E0 2E 
1C92 F0 11 
1C94 AD IE D0 
1C97 29 04 
1C99 C9 04 
1C9B D0 04 
1C9D 98 
1C9E 4C 16 1C 
1CA1 CA 
1CA2 8E 05 D0 
1CA5 98 
1CA6 4C 16 1C 
1CA9 AE 05 D0 
1CAC E0 ED 
1CAE F0 0D 
1CB0 AD IE D0 
1CB3 29 04 
1CB5 C9 0* 



LDX $D004 
CPX #$16 
BEQ $1C69 
DEX 

STX $D004 
TYA 

J IIP $1C16 
LDX $D004 
CPX #$00 
BEQ $1C7C 
DEX 

STX $D004 
TYA 

JMP $1C16 
LDA $D010 
AND #$FB 
ST A $D010 
LDX #$FF 
STX $D004 
TYA 

JMP $1C16 
LDX $D005 
CPX #$2E 
BEQ $1CA5 
LDA $D01E 
AND #$04 
CMP #$04 
BNE $1CA1 
TYA 

JMP $1C16 
DEX 

STX $D005 
TYA 

JMP $1C16 
LDX $D005 
CPX #$ED 
BEQ $1CBD 
LDA $D01E 
AND #$04 
CMP #$04 
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1CB7 F0 04 BEQ *1CBD 

1CB9 E8 I NX 

1CBA 8E 05 D0 STX *D005 

1CBD 98 TYA 

1CBE 4C 16 1C J[1P *1C16 



1BF0 
.: 1BF8 
.: 1C88 
.: 1C08 

.: icie 

.: 1C18 

.: 1C20 
1C28 

.: 1C30 

.: 1C38 
1C40 
1C48 
1C50 

.: 1C58 

.: 1C60 
1C68 

. : 1 C70 
1C78 
1C80 

. : 1 C88 
1C90 

.: 1C98 
1CA0 
1CA8 

.: 1CB0 
1CB8 

.: 1CC0 



20 00 
EA EA 
A5 C5 
F0 11 
F0 7B 
F0 79 
04 C9 
E0 FF 
98 4C 
3F F0 
4C 16 
8D 10 
98 4C 
29 04 
D0 E0 
D0 98 
E0 00 
98 4C 
FB 8D 
D0 98 
E0 2E 
04 C9 
1C CA 
1C AE 
AD IE 
04 E8 
1C FF 



1C 4C 
EA EA 
C9 40 
C9 0A 
C9 03 
60 A8 
04 F0 
F0 17 
16 1C 
04 E8 
1C AD 
D0 A2 
16 1C 
C9 04 
16 F0 
4C 16 
F0 08 
16 1C 
10 D0 
4C 16 
F0 11 

04 D0 
8E 05 

05 D0 
D0 29 
8E 05 
FF FF 



F0 IB 
EA 4C 
F0 14 
F0 46 
F0 E7 
AD 10 
0F AE 
E8 8E 
AE 04 
8E 04 
10 D0 
00 8E 
A8 AD 
F0 0F 
04 CA 
1C AE 
CA 8E 
AD 10 
A2 FF 
1C AE 
AD IE 
04 98 
D0 98 
E0 ED 
04 C9 
D0 98 
FF FF 



EA EA 
A3- 1C 
C9 12 
C9 04 
C9 0D 
D0 29 
04 D0 
04 D0 
D0 E0 
D0 98 

09 04 
04 D0 

10 D0 
AE 04 
8E 04 
04 D0 

04 D0 
D0 29 
8E 04 

05 D0 
D0 29 
4C 16 
4C 16 
F0 0D 
04 F0 
4C 16 
FF 7B 
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SECTION 2.7 



COMMODORE 64 ARCHITECTURE AND INTERRUPTS 

The memory layout in the Commodore 64 is strange to say the 
least. Its microprocessor (the651 0) can directly address 64K of 
memory but the 64 has a total of 84K of memory. How??? Well, 
the 6510 has a special port built in for switching in and out 
blocks of memory. It is controlled by address one. 

The 64 has 64K of RAM. But without INPUT/OUTPUT 
facilities it is useless. As the full 64K is already filled we will have 
to put the other things on top. In the 64, the I/O is from 
addresses D000(53248) to DFFF (57343). This covers some 
RAM but we can flip the I/O out to expose the underlying RAM . 
The I/O consists of two CIA chips for external communication 
(cassette, keyboard, RS232, etc), the SID sound chip and the 
video chip. 

Now we need an operating system, as a computer does nothing 
without one. In the 64 it is called the KERNAL and it is located 
from location E000 (57344) to FFF (65535) on top of the RAM. 
This can also be removed to expose the underlying RAM. 

We now need a language. This language is BASIC. It is located 
from locations A000(40906) to BFFF (491 52). 

The computer will now work — or will it? Yes it will, but we will 
have no characters to display on the screen. Therefore, we 
need another chip. This is called the character ROM or the 
character generator. It stores the 'bit patterns' for the 
characters which can be displayed on the screen. It is stored 
from location D000 (53248) to DFFF (57343). Wait a 
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minute the I/O is stored there. Never mind, we will just 

put the character ROM under it. The video chip has special 
circuitary to enable it to use the character ROM at all times. 

The picture of the memory is very strange. It looks like this: 



Commodore 64 Memory 
Addresses shown in hexadecimal. 




This type of memory organisation is extremely flexible, and it 
allows us to tailor the system to our needs. 

Firstly, in the programmable characters section, we used this 
facility to page in the character ROM (put it on top of the pile so 
that it can be PEEKed): 

1 POKE56334, 128: POKE 1 ,51 : X=PEEKC53248 D: P 
0KE1 ,55: POKE56334, 129: PRINT* 

Typing the above would give a result of 60 (the first value in the 
character ROM). 

When you have paged something in you must return the 
computer to its normal mode by paging out what was paged in . 
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When paging occurs at certain places the interrupts must be 
turned off. This is only when you page out the operating system 
(KERNAL) or the I/O. This is done with POKE 56334,128 (or 
SEI in machine code). When you have finished with the paged 
locations you must page it out again and reset the interrupt. 
This is done with POKE 56334,129. As can be seen from the 
above, address one is the address which controls paging and 
that 55 is the normal value in that address. 

We can remove the OS (operating system) by clearing bit one 
(mask two) of address one. This is done with POKE 1,53. 
However, as the computer cannot last for more than a few 
microseconds without it this is not a wise thing to do, but you 
can write your own and substitute it if you want. To switch the 
OS back in type POKE 1 ,PEEK(1 ) OR 2. 

Flipping out the KERNAL also switches out BASIC, so bit one 
switches out both ROMs. BASIC can, however, be switched 
out on its own by clearing bit zero of address one. Flip it out and 
we have 8K more for our machne code programs. This is very 
useful if we have an all machine code program and therefore 
don't need BASIC. 

We can copy BASIC into RAM. This lets us change BASIC if 
we don't like it. The following program copies BASIC into RAM 
behind the BASIC ROM. 

10 FORft=40960TO49152 
20 POKEA, PEEK CAD 
30 NEXT 

Line 20 may look a little stupid, but if you POKE a ROM on the 
64 the value is put in the RAM directly behind the ROM. Run 
the program. It will take a minute or so. Now the BASIC 
language is in RAM, and ROM. Let's switch to RAM BASIC. 
Type POKE 1 ,54. If the cursor is still flashing then everything is 
OK. If not, turn the computer off and on then re-type and run 
the program. Now BASIC is in RAM, we can now adjust and 
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change BASIC to our needs. BASIC on the Commodore 64 has 
a bug in it. Let's correct it. 

If you type PRINT ASC ("") the 64 will give you an error 
message: 

? ILLEGAL QUANTITY ERROR. 

The value returned should be a zero. To correct the bug, type 
POKE 46991 ,5. This slightly changes the ASC function to give 
a zero. Everything else (including other ASC values) will work in 
exactly the same way. 

PRINT ASC ("") 
Answer ... 

If you want you can change BASIC commands to say what you 
want you can. For example, to change the BASIC command 
LIST to BUST, type the following: 

POKE 41230,85 : POKE 41229,66 

If you now type LIST you will get a syntax error, but if you type 
BUST the program will be listed. The BASIC commands are 
stored from locations 41 1 1 8 to 41 864 inclusive. To change any 
command, find the relevant address and POKE the ASC value 
for the letters you wish to change. The following program lets 
you see what character is at what address so that you know 
which address to POKE to change the respective command. 

10 FORA=40960TO49152 
20 POKEA, PEEK CAD 
30 NEXT 

To return to ROM BASIC at any time POKE 1 ,55. 

In the Commodore 64 there are various interrupt vectors. These 
are two bypte vectors which hold the low and high byte values 
for subroutines which are called every sixtieth of a second by 
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the operating system. The one that we will use is at locations 
788 and 789. All of these vectors can be changed to 
accommodate your own machine code routine. 

eg. 

The vector at locations 768/769 can be changed to allow you 
to add new commands to BASIC. (It is the error vector so you 
intercept the error and do things accordingly.) 

Location 788 contains the low byte and 789 the high byte. 

788 normally contains 49 and 789 contains 234. You can 
disable the BREAK key by POKE 788,52. 

The high byte is the most significant byte of the address/256. 
So the MSB address for this vector is 234 * 256 = 59904. As 
788 contains 49, the routine which is done every sixtieth of a 
second is at address 49 + 59904 which is 59953. 

This routine is essential for the proper running of the 64, so 
when your routine is finished it must always jump to 17. To 
change this vector for your routine change the starting address 
of your routine into Hex. Then take the second two Hex digits. 
Change the Hex number into decimal and POKE this number 
into location 788 . Then take the firsttwo Hex digits and change 
them into decimal and POKE this number into 789. However, 
before doing the above you need to disable the interrupts with 
either POKE 56334,128 in BASIC or SEI in machine code. 
Then, when the two numbers are POKEd into memory, type (in 
a program) POKE 56334, 129 in BASIC or CLI in machine code. 

Function Keys 

There are three ways of making these keys do something 
useful: 

1. Use the CHR$ codes. This is only useful in programs 
where you say 'PRESS F1 to PLAY', for example. See 
Appendix 3 for codes. 
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eg. 



10 IFA4 = "fi_!'THENG0T0 . . . : REM Fl KEY 

20 IFA*=CHR*C133DTHEN...:REM ALSO Fl KEY 

2. PEEK the keyboard (locations 197 or 203). This returns a 
number according to which key was pressed. ( For the function 
keys the number is between three and six.) 

3. The same as above only in machine code (an interrupt 
routine). The routine checks the keyboard (197) to see which 
function key has been pressed, and then sees if the SHIFT key 
has been pressed. It then prints the characters associated with 
each key. 

The following program does just that. First is a disassembly, 
then a BASIC program which enters the code and the 
characters to be printed. The ASCII codes for the characters are 
stored from locations 49409 to 49473 inclusive (C1 01 to C1 41 
Hex). 



C000 


78 






SEI 




C001 


A9 


10 




LDA 


tt$10 


C003 


8D 


14 


03 


STA 


40314 


C006 


A9 


C0 




LDA 


<t$C0 


C008 


8D 


15 


03 


STA 


$0315 


C00B 


58 






CLI 




C00C 


60 






RTS 




C00D 


EA 






NOP 




C00E 


EA 






NOP 




C00F 


EA 






NOP 




C010 


48 






PHA 




C011 


8A 






TXA 




C012 


48 






PHA 




C013 


38 






TYA 




C014 


48 






PHA 




C015 


A5 


C5 




LDA 


$C5 


C017 


C5 


FB 




CMP 
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C019 


F0 


51 




BEQ 


$C06C 


C01B 


85 


FB 




STA 


$FB 


C01D 


C9 


03 




CMP 


#$03 


C01F 


D0 


08 




BNE 


iC029 


C021 


A9 


30 




LDA 


#■430 


C023 


8D 


00 


CI 


STA 


$C100 


C026 


4C 


4A 


C0 


J MP 


$C04A 


C029 


C9 


04 




CMP 


#1.04 


C02B 


D0 


08 




BNE 


$C035 


C02D 


A9 


00 




LDA 


#$00 


C02F 


8D 


00 


CI 


STA 


$C100 


C032 


4C 


4A 


C0 


J MP 


$C04A 


C035 


C9 


05 




CMP 


#$05 


C037 


□0 


08 




BNE 


$C041 


C039 


A9 


10 




LDA 


#$10 


C03B 


8D 


00 


CI 


STA 


$C100 


C03E 


4C 


4A 


C0 


J MP 


$C04A 




C9 


06 




CMP 

K—' I II 


»$06 


C043 


D0 


27 




BNE 


$C06C 


C045 


A9 

I U 


20 




LDA 


#$20 


C047 




00 


CI 


STA 

•JIM 


$C100 


P04A 


AD 




02 


LDA 

1 — Ul 1 


$028D 


C04D 


C9 


01 




CMP 


#$01 


C04F 


D0 


08 




BNE 


$C059 


C051 




00 


CI 


LDA 


$C100 


C054 


69 


08 




ADC 


#$08 


C056 


8D 


00 


CI 


STA 


$C100 


C059 


A2 


00 




LDX 


#$00 


C05B 


AC 


00 


CI 


LDY 

I— U 1 


$C100 


C05E 


B9 


01 


CI 


LDA 


$C101 ,Y 


C061 


90 


77 


02 


STA 


$0277 ,X 


C064 


E8 






I NX 




C065 


C8 






INY 

AMI 




C066 


E0 


08 




CPX 


#$08 


C068 


D0 


F4 




BNE 


$C05E 


C06A 


86 


C6 




STX 


$C6 


C06C 


68 






PLA 




C06D 


A8 






TAY 




C06E 


68 






PLA 




C06F 


aa 






TAX 
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C070 68 PLA 

C071 4C 31 EA JMP *EA31 



Just type in the following BASIC program and run it. When the 
computer says 'READY' the function keys are programmed: 

18 datal20,169,l6,14t ,20,3,169,192,141 ,2 
1 ,3 ,88,96 ,234 ,234 ,234 ,72 , 138 ,72 , 152 ,72 
15 datal65,197,197,251 ,240 .81 , 133 ,251 ,20 
1,3,208,8,169,48,141 ,0,193,76,74,192 
20 dat&201 ,4,208,8,169,0,141 ,0,193,76,74 
,192,201 ,5,208,8,169.16,141 ,0,193,76,74 
25 datal92,201 ,6,208,39,169,32,141 ,0,193 
,173,141,2,201,1,208,8.173.0,193,105,8 
30 datal41 ,0,193,162.0,172,0,193,185,1 ,1 
93 , 157 , 1 19 ,2 ,232 ,200 ,224 ,8 ,208 ,244 ,134 
35 dat al98, 104, 168, 104, 170, 104, 76, 49, 234 
40 f or a=49152t o 49267: readb : pokea ,b '.next 
50 f ora=0t o7: readki: f orb = lt 08: 1 =asc C Cm i d 
$Ck*,b ,1DDD'. i f I =95t hen I =13 
55 l f I =2051 hen I =4 

60 p oke 49409+ Ca*8 3+b , l : next : next : poke 494 

09,4:sys49152 

70 data" I 1st -linn" 

80 dat a"run -finnn" 

90 d&t &"j>r mt MMM" 

100 data"thennWW" 

110 data"toadnnnn" 

120 dat a"sa<*>eMr1tin" 

130 dat a"ver I fyrlM" 

140 dafa"9ot onnnn'" 



Notes on the above program: 

Lines 1 0-35 contain the machine code for the routine. 

Line 40 POKEs in the machine code into memory. This is a 4K 

block of RAM which is useable in B AS IC so you are still left with 

the full memory capacity for BASIC programs 

Lines 50-60 poke the data for what will be printed when the 
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keys are pressed (F1 -F8). The 'M' signs are needed to fill the 
data up to eight characters per key, but they are changed to 
characters which print nothing in order to make the routine 
work correctly. The maximum number of characters which can 
be in the quotes is eight (per key). 
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SECTION 2.8 



SIMILARITIES BETWEEN MACHINE CODE AND BASIC 

Some BASIC commands can be directly changed into machine 
code. They are as follows: 



POKE number, value 



AND number/variable 
OR number/variable 

IF variable = 



THEN 

SYS address 



LDA value: STA number. 
LDX value: STX number. 
LDY value: STY number. 

AND number / variable. 
DRA number / variable. 

CMP accumulator with. 
CPXX register with. 
CPYY register with. 

BNE branch if not equal. 
BEQ branch if equal. 

JSR address. 
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SECTION 2.9 



PROGRAMS TO TRY 

Here is a hexadecimal loader program. It allows you to write 
machine code in Hex and type the Hex in. It also allows you to 
run the machine code, save or load it onto tape and is used to 
enter the Hex machine code programs in this book. 



5 A*="0123456789ABCDEF" 
10 PRINT "sJ' 
15 POKE198,0 

20 INPUT"LOAD PROGRAM"; L$: IFLEFT$CL$ , 1 D = 
" Y " THENGOSUB 1000: GOTO40 

30 INPUT"SAUE PROGRAM"; S$: IFLEFT$CL$,1 D = 

"Y"THENGOSUB2000 

40 INPUT"STARTING LOCATION" ; SL 

50 PRINTSL;:INPUT"HEXC2D DIGITS" ;H$ 

60 I FH$ = " END " THEN200 

70 F0RA = 1T016:B=A-1^FLEFT$CH$,1 D=MID$CA 
*,A.l DTHEN80 
75 NEXT 
77 GOTO50 
80 DE=B*16 

100 F0RA=1T016:B=A-1: IFRIGHT*CH*,1D=MID* 
CA$,A,1 DTHEN120 
110 NEXT".GOTO50 
120 DE=DE+B 

130 POKESL ,DE: SL=SL+^ :DE=0: H$ = " " : GOTO50 
200 INPUT"RUN MC.";R$:IFLEFT*CR*,1 D="Y"T 
HEN220 
210 RUN 

220 INPUT"STARTING LOCATION" ; SL: SYSCSL D 
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1000 INPUT"ADDRESS TO START AT" ; AS: INPUT 

"NAME OF PROGRAM ";N$ 

1005 INPUT"FINISHING ADDRESS" ; FA 

1010 OPEN1,1,0,N$ 

1 020 FORX =SATOF A : I NPUT* 1 , Y : POKEX , Y : NEXT 
1030 CLOSE 1 
1040 RETURN 

2000 INPUT"ADDRESS TO START AT" ; AS: INPUT 

"NAME OF PROGRAM" ; N* 

2005 INPUT"FINISHING ADDRESS"; FA 

2010 OPENl,l,2,N$ 

2020 FORX=SATOFA:Y=PEEKCXD:PRINT*l ,Y: :NE 
XT 

2030 CLOSE1 
2040 RETURN 



Following are a Hex to decimal converter, a decimal to Hex 
converter and a binary to decimal converter. 



10 INPUT"HEX";H$ 

20 Ai~"0123456789ABCDEF" 

30 FORA = 1T016:B=A-1: IFLEFT*CH$,1 D=MID*CA 

4,A,1 DTHEN50 

40 NEXT 

50 DE=8*16 

60 F0R**lT016:8=A-l: IFRIGHT*CH* ,1 D=MID$C 
A$,A,1 DTHEN80 
70 NEXT 

80 OE=DE+B: PRINTDE 



5 A$="0123456789ABCDEF" 

10 INPUT" DECIMAL NO C MAX 255 3";DE 

20 C = INTCDE/16D:D = CDE/16-C3*16 

30 H*=MID*CAi,C+l ,1D+MID$CA$,D+1 ,1 3 

40 PRINTH* 

50 GOTO 10 
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10 INPUT"BINARYC8 BIT D" ; BN$ 

20 I FLEN C BN$ D >8THENPR I NT " TOO L0NG":60T01 



30 DE=0:A=0 

40 F0RX=8T01STEP-l:A=A+l: IFUALCMID*CBN* , 
A,l 3 ]>1THENPRINT"ERR0R" : GOTO10 
50 DE=DE+UALCMID$CBN$ ,A , 1 DD*2tCX-l D 
60 NEXT : PRINT " DEC I MAL = " ; DE : GOTO 1 

Here is a maze game. You have to guide your character around 
the maze in the shortest possible time. Some of the lines are 
greater than 80 characters in length (which is the maximum 
allowed by the Commodore 64). so you will have to use the 
keyword abbreviations in order to enter the program correctly. 

pr intchr$C142Dchr$C8D 

1 P oke54296, 15: poke54277, 128: poke 54278,1 
28:poke54276,33 

4 d ima$C100D:ht$ = "" 

5 Print " SDqqqqq AAAAAAAAAAAAAAAlHlX^X7aiP " 

6 poke53281 , 15: poke53280 ,9: pr int "asu Ide 
your man around the maze as fast g_ as po 
s s i b I e " ; 

7 print" usin9 keys " : pr i nt "as_ r_zR_ I e 
•ft rj<B_ r l ght " : pr i nt " qqr kB- u 
P rmfLdoun" 

8 p r '• " t " □ a ^^^r d r p s s a key to play" 

9 pokel98,0:wait 198,1 

10 fora=8448to8460:pokea,0:next 

11 P oke53272,24 

12 pr int , 'S_;';poke54296,15 

13 rem h i 9h res 

14 poke53281 ,0 

15 a=8712 

16 readb: i f b =300t hen 1,8 

17 pokea ,b : a=a+l : got o 16 

18 -f or a=8576t o8662: readb : pokea ,b : next : po 
ke8199+58*8,0 

20 a$ C 1 D = " AAAAAAAAAAAAAAAAAAAAAA " 
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21 


f ora=0t o9: 


a*Ca D=a$C10 D: next 




22 


a$Cll D= 


"A 






23 


P=1344 








24 


a*C12D = 


"A 


AAAAAAAAAAAAAAAAAA 


A" 


25 


a*C133 = 


"A 


A A 


A" 


26 


a*C14 D = 


"A 


A A AA AA A A 


A" 


27 


a$C15D = 


"A 


AAA AA A A 


A" 


28 


atC163 = 


"A 


A A AA AA A A 


A" 


29 


a*C17D = 


"A 


A A AAAAAA A A 


A" 


30 


a*C18D = 


"A 


A AA A 


A" 


31 


a$C19D = 


"A 


AAAAA AA AAAAA 


A" 


32 


a$C20 3 = 


"A 


AA 


A" 


33 


a*C21 D= 


"AAAAAAA A AA A AAAAA 


A" 


34 


a*C22D = 


"A 


A A A AA A A 


A" 


35 


a$C23D = 


"A 


AAAA AA AAAA 


A" 


36 


a*C24 3 = 


"A 


AAAA AA AAAA 


A" 


37 


a$C25D = 


"A 


AAAA AAAA 


A" 


38 


a$C26D = 


"A 


A A AA AA A A 


A" 


39 


a$C27D = 


"A 


A A A A A A 


A" 


40 


a*C28D = 


"A 


A AAAA A A AAAA A 


A" 


41 


a*C29D = 


"A 


A A A A 


A" 


42 


a*C30D = 


"A 


AAAA A A AAAA 


A" 


43 


a$C31 D= 


"A 


A A AAAAAAAA A A 


A" 


44 


a*C32D = 


"A 


A A A A 


A" 


45 


aiC333 = 


"A 


A AAAAA AAAAA A 


A" 


46 


a$C34D = 


"A 




A" 


47 


a*C35D = 


"A 


AAAAAAAAAAAAAAAAAAAA" 


48 


a*C36D = 


"A 


A 


A" 


49 


atC373 = 


"AAAA AAAAAAAAAAAAA 


A" 


50 


a*C38D = 


"A 


AAAAA 


A" 


51 


a*C39 3= 


"A 


AA 


A" 


52 


a$C40D= 


"AAAAAAAA AAAA AAAAAA" 


53 


a$C41 D= 


"A 


AA AA AA 


A' 


54 


a$C42D= 


"A 


AAA AA AA AAA 


A" 


55 


a$C43D = 


"A 


A AA AA A 


A' 


56 


a*C44D= 


"A 


A A A A 


A' 


57 


a$C45D= 


"A 


A AAAAAAAAAAAAAA A 


A' 


58 


a$C46D= 


"A 


A A 


A' 


59 


a$C47D= 


"A 


AAAAA A A AAAAA 


A' 


60 


a$C483= 


"A 


A AAAAAA A 


A' 
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61 a*C49D="AAAAA AA A A AAA" 

62 fora=0to49:a$C50+a>a$C49-a3 

63 next 

65 a*C88D="A A" 

66 9oio72 

67 dat a'255 , 1 29 , 255 , 1 29 , 255 , 1 29 , 255 , 1 29 

68 dat al29 ,90 ,36 , 126 ,255 ,60 ,36 , 195 ,255 , 1 
27,63,31 ,15,7,3,1 ,128,192,224,240,248 

69 dat a252 ,254 ,255 ,0 . 126 ,24 ,24 ,24 ,24 ,24 , 
24,0,60,24,24,24,24,24,60 

70 dat a0 , 126 ,64 ,64 , 126 ,64 ,64 , 126 ,0 ,66 , 10 
2,90,66,66.66,66,0 

71 data300 

72 a=86: x=20i t I $="000000" 

73 pr I n t " sggggg " 

74 forb=atoa+4 

75 pr inttabC8D;a*Cb D 

76 next 

77 i fpeekCp+xD<>32then88 

78 pokep+54272+x,5:pokep+x,66 

79 pr I nt " seggqggggggqq qqqq ^^^^^^^ 
FHG: ";mid$Ct l$,3,2D"s ";r ighttCt !$,2D; "_ 

80 e=peekC197D". ! fe=64then73 

81 poke54272,100:poke,54273,100 

82 I fe=36thena=a+l:m = l 

83 I fe=37thena=a-l:m=2 

84 P oke54272,0:poke54273,0 

85 I fe=12thenx=x-l:m=3 

86 i f e =23t henx=x+l : m=4 

87 goto73 

88 i f m=lt hena=a-l 

89 I fpeekCp+xD=67orpeekCp+xD=68then96 

90 P oke54272,100:poke,54273,100 

91 i fm=2thena=a+l 

92 i fm=3thenx=x+l 

93 ! fm=4thenx=x-l 

94 poke54272,0:poke54273,0 

95 9Qto73 

96 fora=255to0step-4i -f or b =5t o 15st ep3 

97 poke54296,b:poke54272,200: poke54273,a 
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99 nextb f a: p ok e54272,0: poke 54273,0: poke 5 
3272,21 

100 pv Int " Qpyqqqqq ^ ^y mir time UaS " i Vh i d % 

Cti*,3,23;" minutes " ; r i ght $Ct i $ ,2 3; " se 
conds " 

101 pr int " sqqqqqqqqqqqqqqqqqq g ^^^^^.^ 
re any key to rest art _' 

102 i fpeekC197DO64thenl02 

103 I fpeekC197 3=64thenl03:pr int "SI' 

104 t i*="000000" 

106 restore 

107 pr Int " sqqqqqqgqqqqqq" 

108 run 

110 data0, 126, 70, 74. 82, 98, 126, 0,0, 56, 24, 

24,24,24,126,0,0,126,66,4,120,98,126,0 

112 data0, 126, 2, 62, 6, 6, 126, 0,0, 64, 64, 64, 

96,100,126,4,0,126,64,64,126,6,126,0 

114 data0, 96, 96, 126, 98, 98, 126, 0,0, 126, 2, 

2 ,6 ,6 ,6 ,0 ,0 , 126 ,66 , 126 ,66 ,66 , 126 ,0 

116 data0, 126, 66, 66, 126, 6, 6, 0,0, 0,24 ,0,0 

,24,0,0,0 

118 d at a0, 126, 24, 24, 24, 24, 24, 24,0 



Here is an adventure program that takes place in the 
underground caves of Marple. 



1 pr intchrf C14 3chr<t-C8 3:poke53280,2:poke5 
3281 ,0 

10 pr int "SU'sd imaC4253 
20print:print 

30 print"S_s_ Treasure Hunt.":f 

orhh=lto2500:next 

40 print '.print 

60 deffnr Cx3=int CrndCl 3*x3+l 

70 pr int " SggT he MARPLE CAUES , I ocated in 
Mar p I e-t own ,are said to have 20" 

71 print"Hidden treasures in them. Feu ex 
plore them, because it is said that" 
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72 print "PIRATES and DRAGONS I I ue there- 
-bes ides" 

80 pr i nt "t here are deep pits which many 
haye faLlen into and DIED" 

31 P r int "oaPRESS fl TO CONTINUE" 
33 getm* 

85 i f m* = "EJ'then88 

86 goto83 

88 print " Sgggg " 

90 print "YOU, a smart and brave human , and 
I a Commodore 64 will explore the c 

aues " 

91 print"and try to find the treasure. 
I u i I I be your eyes and ears" 
92f>rint"and u i I I tell you If danger lur 
ks ahead . " 

100 pr int 

110 print" I hope you brought a map. In 
case you d i dn ' t ,you 1 1 1 have to" 

111 prlnt"make one as ue exp I ore " : pr i nt : 
pr int "aaPRESS fl TO CONTINUE." 

112 getm* 

113 i fm$ = "£_"thenl40 
115 gotoll2 

140 pr int "SI' 

141 fori=lto3 
150 n=3+fnrC88D 

160 i f aCn K>0thenl50 

170 aCnD=2 

180 next 

190 fori=3to9 

200 n=3+fnrC88J 

210 i faCn DO0then200 

220 aCn]=i 

230 next 

240 for i =288to304 

250 n=fnrC943 

260 i faCn DO0then250 

270 aCnD=l 

280 next 
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290 restore 
300 forn=lto23 
310 readai 
320 next 

330 forn=137to408 
340 readaCn } 
350 next 

360 u=0:m=0:b=200:d=0 

400 Pr i nt " qqqq " 

410 print" Welcome to the Marple Caves u 
here you will find MYSTERY" 

411 print "TREASURE and ADUENTURE ! " 
420 print 

430 goto500 

470 pr int "SJ' 

480 b=b-l 

490 I fb=0t hen3740 

500 i fu=0then3140 

540 i f fnr C200D=200then9osubl890 

550 i f fnr C200D=200then9osub2120 

560 i f d =0andaCw D=0and f nr C50 D=50t hengosub 

2850 

570 I faCuD=6andCfnr C5 ]=5 Dt hen3570 

620 i faCuD=2then3440 

630 i faCu D=4then2890 

640 ! f aCu D=5t hen9osubl770 

650 ifaCwD=7thenprint:print:print "There 1 

s a shy little elf in here hiding so 

met h i ng • 

660 i faCuD=8then2410 

700 gosub3350 

710 z=u 

720 gosub4120 

730 forn=134tol36 

750 pr inttabCl D"CAUE";aCn ]; 

760 i faCn D=0thenpr int "-THE ENTRANCE I " ; 

770 pr int 

780 next 

820 i fb>190then880 
830 ifu<>0then880 
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840 input "To explore hitl else 2" 
360 i f j=2then3810 
870 ifj<>lthen840 

880 i -f b =50t henpr i ni :pr i ni " I hope you b 

fought your torch batteries" 

890 i fb-25thenpr i nt :pr Int "Your torch is 

st ar t i n 9 to dim a bit." 
900 i f b =8t henpr i nt : pr i nt " Your torch is a 
Lmost out. Better leaue right now!! 

I I 

910 i faCu :=3thengos2290 

950 k=0: I =0 

970 f orn =134tol36 

980 J=aCuD 

990 i f j<0t hen 1090 

1000 i faCj D=5thenl090 

1010 i faCj D>0andaCj K10andk*0t henpr Int :k 
= 1 

1020 I faCj D=2andl =0thenpr int "^There are 
Pits nearby. uatch your step.";l=l 

1030 1 -faCj D=3thenpr int " CAREFUL- There's 
a p i rat e nearby" 

1040 i f aC J D=4t henpr int " I hear a hungry 
dragon near by-ua ! t i ng for his SUPP 

ER I " 

1050 i fCj D=6thenpr int "There 's a sign her 
e that says: " P r Int " Sgqq^r > >DrtNfiFR < <fR 

□;■ 

1060 I f aC J D=7t henpr I nt "Sounds like someo 

ne is singing, Must be an ELF." 

1070 i f a C J D =8t henpr Int "There 's a strange 

mist in here!" 
1080 I f aC J J=9t henpr int "RUFF RUFF I . . . . I 
pan hear a dog barking" 
1090 next 

1100 i faC131 D=0thenl200 
1110 pr Int 

1120 prlnt"Ypu're carr y i ng : " ; at 
1140 i faCn X100t henll90 
1150 z=aCn D 
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1160 gosub4040 
1 170 pr I ni &$; 
1190 print 

1200 ifaCuj}<100thenprint : goto 1440 
1240 pr i nt 
1250 z=aCuD 
1260 9osub4040 

1270 pr i nt "ATh i s caye h as " ; ai; " ! n it" 
1280 print "Do you want to take it uith y 
ou?gJ' 

1290 input "CY or N D" I j$ 
1300 i f jt="n"thenl440 
1310 i f j*O"y"thenl290 
1320 i f z=290t hengosub 1630 
1330 i -fz=290t hen 1440 
1340 i f z=291thenm = l 
1350 i f z=294t hen9osub 1990 
1360 i f z=lthenl440 
1370 i fz=295t hen 3650 
1380 forn=131tol33 

1390 i faCn 3=0thenaCn D=atuD:aCuD=0:gotol4 
30 

1400 next 

1410 prinfjou can't pick it up nou...y 
ou're carrying too much." 
1420 gotol440 

1430 pr int "O.K. you ' ve got";a$"." 

1440 i f aCu D=7t henaCu D=307 

1480 input"uhich caue next";h 

1490 forn=134tol36 

1500 i faCn D=-lthenl520 

1510 i fh=aCn Dt henu=h : got o470 

1520 next 

1530 i fm = landh>=0andh<=94and int Ch D=hthen 
u=h : got o470 

1540 pr i nt "g_ Sorry , but you can't go the 
re from here „gj' 
1550 gotol480 
1630 forn=131tol33 
1640 i f aCn D=298t henl680 
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1650 next 

1660 print "You can't take it-it's too he 
auy i " 

1670 return 

1680 print" The box was too heavy so I o 
pened it with your keys .By the way, there 

is a" 

1681 pr i nt "_r ubyQ in it that you can t ak 
e . " 

1690 aCu 3=308 
1700 z=308 
1710 gosub4040 
1720 return 
1760 print " gggg " 

1770 print" There's a FRUIT MACHINE 

in her e . " 
1780 forn=131t o 133 
1790 i f a.Cn 3=288t henl820 
1800 next 
1810 return 

1820 print"I'll get some batteri 

es with one of your ifjOLDQ. co i ns . " 

1830 b=200 

1840 aCu3=0 

1850 return 

1890 forn=ltol0 

1900 z=3+rnrC883 

1910 gosub3950 

1920 next 

1930 pr int " gggggg " 

1940 print "Guess what i We've just had 

an earthquake i IBut I'm O.K..„" 
1950 return 
1990 forn=131tol33 
2000 i faCn D=293then2040 
2010 next 

2020 print" It's stuck in the rocks a 
nd can't be pulled out." 
2030 z=l : return 

2040 print" Let me use your magic u 
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and a sec."; 

2050 f orz=0t o2000: next 

2060 P t int "aaaHOCUS.POCUS. . 

2070 f orz=0to2000:next 

2080 aCu 3=310: z=0 

2090 return 

2120 pr int "qqqqqq":pr Int "" 

2130 print" A superbat Just fleu cave an 
d picked you up ." 

2140 i f aC131 3<>0thenpr i nt "Vou dropped aL 

L your treasures" 

2150 forn=131tol33 

2160 i -faCn 3=0then2180 

2170 aC03=aCn 3:aCn 3=0: z=0: gosub3950 

2180 next 

2190 n=fnrC943 

2200 i faCn DO0then2190 

2210 u=n J . , 

2220 print" The bat Just dropped you int 

o caue " ;u" ! It " i . . 

2230 prinf'If you're all right hit a key 

2231 aeta*: i f a*=" "t hen2231 
2233 pr int 

2240 pr i nt "sj" 
2250 return 

2290 pr int "g_guJhere uas a pirate in here 

2300 I faC133O0thenpr int "HE JUST STOLE A 

LL YOUR TREASURES ! " 

2310 forn=131tol33 

2320 aCu3=0 

2330 next 

2340 z=u 

2350 gosub3950 

2360 pr int " HE'S GONE NOW I . " 

'2370 return 

2400 pr int "SJ' 

2410 pr int " qqqqqq" :pr int 

2420 pr i nt "There ' s a magician in this ca 
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ye .He says he's lost his magic book." 

2421 print "He says he'll 9 i ye you a ±£0L 
DEN HRRPQ if you'll tell him uhere it is 

2422 pr i nt "ig^sjype in the cave number. 
If you don't know then just type 99. g." 
2450 i nput "Where ' s his book?";j 

2470 i f J <0andJ>95then2520 

2480 i faCj K>295then3840 

2490 aCiJ 3=309 

2500 aCj D=0 

2510 goto470 

2520 z=u 

2530 9osub3950 

2540 goto470 

2580 pr i nt " gggggg" Sprint 

2590 print"The Invisible man is here lo 
oking for his invisible dog .He says he' 
II 9 i ve 

2595 print "you a 41000 reward if you can 
tell him uhere It is. If you d n n ' t ^ V n n 

uj" 

2596 " Q^s^itfJ h e n guess. gj' 

2610 input "What cave is it ing_";j$ 

2620 pr int "£" 

2630 j = ini Cval C J * J 3 

2640 i f J<0andJ>95and int Cj DOjandaCj K>9t 

henr et urn 

2650 aCuD=305 

2660 aCj J=0 

2670 d=l 

2680 return 

2720 forn=131ti)133 

2730 i faCn D=291then2770 

2740 next 

2750 m=0 

2760 return 

2770 aCuD=0 

2780 i fn=133then2830 

2790 forj=ntol32 
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2800 aCj3=aCj + 13 
2810 aCj+lD=0 
2820 next 

2830 print" PUFF!!! Your magic carpet 
Just d i appear ed . " 
2840 m=0:return 
2850 rem 

2890 forn=131tol33 
2900 i faCn 3=292then2930 
2910 next 
2920 goto3500 

2930 pTir>t" qqgqqq" :print " V I KES-t h e r e 's a 

dragon 1 n here . " 
2950 print "Give me your gurVa^AAO. QUICK ! ! 
I 

2960 forn=0to2000:next 

2970 pr int "SI' 

2980 forn=lto5 

2990 pr inttabC5 3"iasJ3ANG! ! E" 

3000 for j=0to500:next :pr int "SJ' 

3010 next 

3020 pr inttabCfnr C30 3 3; "PUFF! !" 
3030 for j=0to300:next :pr int "SJ' 

3040 print" INCREDIBLE ???The dragon 
Just vanished when I shot him right bet 
ueen the" 

3041 pr i nt "g_eyesLT 

3050 printsprint" But Look at this-he I 
eft his little black book behind-ujith th 

3051 pr int "EUERY BEAUTIFUL PRINCES 
S IN PENNSLY-ULUANI A . " 

3052 pr i nt "address of every beautiful pr 
incess in PENNYSLYUANI A ! " 

3070 print"gJHit a key when you catch yo 
ur breath" 

3071 geta*: ! f at=" "t hen3071 
3080 aCu 3=306 

3090 b =b + l 
3100 got o470 
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3140 I faC131 J=0th'en3218 
3150 forn=131tol33 
3160 i faCn D=0then3200 
3170 j=96 

3180 ! faCj K>0ihenj=J + l:goto3180 
3190 aCj D=aCuD 
3200 next 

3210 i faC96D=0then3270 

3220 print "So far you've found these tre 

asures in the caves : " 

3230 forn=96tol30 

3240 I faCn D=0f hen3270 

3250 z=aCn D: 90 sub 4040: pr Intat" , "; 

3260 next 

3270 forn=131tol33:aCnD=0:next 
3280 pr Int " gg" 

3290 pr i nt "g_g_You ' r e at a cave entranc 
e t hat I eads to."" 
3300 b=b + l 
3310 9 oto710 

3350 pr ! nt "aaaYou ' r e in c ave " u " uh I c h lea 
ds to:" 
3360 return 

3440 pr int " gggggg^S or rv r but I tried to 
warn you . " 

3450 print"You fell into a deep pit ... 
and JCILLEDO. your sq I f I ! ! " 
3460 end 

3500 pr int " gggggg " ; pr int " " 

3510 print" Sorry but I tried to tell yo 
u about that sound. Supper Is now being s 
erved he 

3511 pr Int " in the" 

3512 print "nDRAGON ' S CHAMBER . ... " 

3520 pr int "gj's for i = lt o2500: next J pr Int "aa 
dAND YOU ARE THE aaA SUPPER 1 1 IQ." 
3530 end 

3570 pr i nt " gggggg " : pr i nt " " 

3580 print "The roof just fell In and bur 

led you alive. Too bad, I don't have a s 
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hove I " 

3581 print "or I'd d i 9 you out." 
3600 print "gSee you Later." 
3610 end 

3650 pr i nt " sggggggg " 

3670 print "I don't think you. should 
have done that {The magician who owns tha 
t " 

3672 print "n^/vAinnQ i r. book" 

3675 print"put a spell on it. Anybody tha 

t tries to pick it up turns into a nJ r 9 

Q." 

3680 print 

3690 print "Excuse me uh i I e I look for so 
me flies." 
3700 end 

3740 pr i nt " gggggg " Sprint 

3750 print" Nou Look uhat you did. Your f 
Lashli9ht went out ana you fell into a p 
It and" 

3751 print "KILLED YOURSELF " 

3755 print "TOO BAD t Especially as you ue 
re do i n9 so ue I I . " 
3760 end 

3800 print " ggggggT he treasures are yours 

to keep SWELL DONE I 8 8" 
3810 end 

3840 pr i nt " gggggg You 1 ve made the mag i c i 
an UERY angry.. Cave "doesn't have a 

3850 print "magic book in it." 

3860 print "To punish you, the mag i c i a 
n casts a spell on you and nou you're on 
Ly" 

3861 print "TWO INCHES TALL ! ! ! " 

3870 print "Worse yet, the magician put yo 
u in a small Jar. If you ever get out 
of this" 

3871 print "messg_]J_llLET ME KNOW III" 
3880 end 
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y=3+fnr C88D 


QQ£ira 


i f aCy K>0t hen3950 


QQ~3(y» 

oy/ka 


! f y=uandy=zt hen3950 


OQora 

yyyid 


aCy 3 = 






aCz D = 


= 


A fjt fyl 


return 


/I fa/1 fy* 


restore 




f or x = 


=0toz-288 




readaf 




ne xt 






return 


4 1 Zia 


•f or x = 


;0to2 


A 1 "3Q 


a C 1 34+x ] =a C 1 37+x+ C z*3 3 3 


A 1 AOi 


next 




✓1 1 cr fTi 
4 1 OKJ 


return 


QQ 1 Ol 


a at a 


gold coins 


QQ 1 1 

yyi l 


-1-4. _ " 

cat a 


some keys 


QQ 1 O 
33 1 Z 


dat a 


a locked box 


QQ 1 Q 


dat a" 


a mag i c carpet " 


QQ 1 ^ 


dat a" 


an old gun 


yy l o 


dat a" 


a mag i c uand 


QQ 1 

yy l o 


dat a" 


a suord 


QQ 1 ~J 

yy l / 


dat a" 


a mag i c book 


QQ 1 O 

yy lo 


dat a" 


an old clock 


QQ 1 Q 

yy l y 


dat a" 


some furs 


qqOd 


dat a" 


a s i i uer bell " 


JJi 1 


dat a" 


a neck I ace 


QQOO 

yyzz 


dat a" 


. a pe ar L 


QQOQ 

yyzo 


dat a" 


a d i amond 




dat a" 


a gold uat ch " 


yy zo 


dat a" 


an emerald 


yy zo 


dat a" 


some Jet. el try "' 


yyz/ 


dat a" 


a _J000 note " 


9928 


dat a" 


a b I ack book " 


9929 


dat a" 


some elf food 


9930 


dat a" 


a ruby 


9931 


dat a" 


a golden harp " 


9932 


dat a" 


a suord 



10000 d at al, 94,1 ,0,2,3,1 ,4 ;5,1 ,6,7,2,8,9 
,2,10,11 ,3,12,13,3,14,15,4,16,17,4,18,19 
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10001 data5,20,21 ,5,22,23,6,24,25,6,26,2 
7,7,28,29,7,30,31,7,32,33,8,34,35,9,36,3 

7 

10011 data9, 38, 39, 10,40,41 ,10,42,43,11 ,4 
4,45,11 ,44,45,11 ,46,47,12.48,49,12.50,51 

10023 datal3, 52, 53, 13, 54. 55, 14, 56, 57, 14, 
58,53,15,60,61 ,15, 62, 63, 16, -63, 64. 16, 34, 6 

4 

10024 dai al7 ,33 ,65 , 17 ,36 ,37 , 18 ,35 ,66 , 18 , 
38.66,19,37,67,19,40,67,20,39,68,20,42,6 

8 

10025 daia21 ,41 ,69,21 ,44,69,22.43,70,22, 
46,70,23,45,71 ,23,48,71 ,24,47,72,24,50,7 

10026 daia25,49,73,25,52,73,26.51 ,74,26, 
54,78,74,27,53,75.27,56,75,28,55,76,28.5 

8 

10027 data76 

10028 dai a29 ,57 ,77 ,29 ,60 ,77 ,30 ,59 ,78 ,30 , 
62,78,31 ,61 .79,31 ,32.79,32,33,80.34.35.8 

,0 

10029 data36,37,81 ,38,39,81 ,40,41 ,82,42, 
43,82,44,45,83,46,47,83,48,49,84,50,51 ,8 

4 

10030 dat a52 ,53 ,85 ,54 ,55 ,85 ,56 ,57 ,86 ,58 , 
59,86,60,61 ,87,62.63,87,64,65,88,66,67,8 

8 

10031 data68,69,89,70,71 ,89,72.73,90,74, 
75,90,76,77,91 ,78,79,91 ,80,81 ,92,82,83,9 

2 
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APPENDICES 
APPENDIX 1 



Abbreviations for BASIC keywords 

Commodore 64 BASIC allows you to abbreviate most of the 
BASIC keywords. The usual format for these are the first letter 
of the keyword and the second leter shifted. When you LIST 
the program the keywords will be listed out in full. 



Comma nd 

ABS 

AND 

ASC 

ATN 

CHH$ 

CLOSE 

CLR 

CMD 

CONT 

DATA 

DEF 

DIM 



Abbreviation 



looks like 
this on screen 
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END E N E 

EXP E |^^Q| X E j"?*] 

FOR F F j^j 

FRE F R F Q 

GET Q E 00 

GOSUB GO ^^S8 S GO [v] 

GOTO ^^^9 G Q 

INPUT* I ^^^H N I [7] 

LET L RfflS E L Q 

LEFTS LE »-i:iiaM F LE 

B 

LIST L EQQII ' L 

LOAD L SQ^fl L Q 

MID$ M QffiQ|| I M 5l] 

NEXT N B^QI E N ^ 

NOT N N [^] 

OPEN P CD 

PEEK P E P H 

POKE P EDQi P Q 

PRINT ? ? 

PRINT* P " P | | 

READ R g^Qg E R 

RESTORE RE gjQ^Qp S RE jyj 

RETURN RE QiUfl T RE 

RIGHTS R ^^Qp * R ^] 

RNO R EB| N 
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run r E35I r Q 

save s EQQyi A s S 

SON S EXO S 

sin s ESQ! 1 s 

SPC( S QQ^P s ( [ 

SQR S ^^21° 3 B8 

STEP ST ^QQyjl E ST Q 

STOP S QQ|t S [£] 

STR$ ST R ST [ I 

sys s EDO y s (ZD 

TAB T A T [5] 

THEN T H T 

usr u s u H 

VAL V Q]Q A Vg 

VERIFY V QQQI E V CH 

wait w EEB * w ® 
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APPENDIX 2 



Screen display codes 

The following table lists all the characters which can be 
displayed on the screen along with their respective number to 
POKE. For example, POKE 1024,1 puts an A in the top left 
corner of the screen. There are two character sets available to 
you. They cannot be used together but can be switched by 
hand by pressing the SHI FT and Commodore keys together, or 
typing POKE 53272,21 to switch to upper case (set 1 ) mode 
and POKE 53272,22 switches to lower case mode. 



SET 1 


SET 2 


POKE 


M 


m 


13 


@ 







N 


n 


14 


A 


a 


1 


O 





15 


B 


b 


2 


P 


P 


16 


C 


c 


3 


Q 


q 


17 


D 


d 


4 


R 


r 


18 


E 


e 


5 


S 


s 


19 


F 


f 


6 


T 


t 


20 


G 


g 


7 


U 


u 


21 


H 


h 


8 


V 


V 


22 


I 


i 


9 


w 


w 


23 


J 


i 


10 


X 


X 


24 


K 


k 


11 


Y 


y 


25 


L 


I 


12 


z 


z 


26 
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[ 

£ 

1 

T 



# 

$ 

% 
& 



/ 
o 
1 

2 
3 
4 
5 
6 



27 


7 




55 


28 


8 




56 


29 


9 




57 


30 


; 




58 


31 






59 


32 


< 




60 


33 






61 


34 


> 




62 


35 


? 




63 


36 


i — i 
bd 




64 


37 
33 


® 


A 


65 


CD 


B 


66 


39 


B 


C 


67 


40 


B 





68 


41 


□ 
□ 


E 
F 


69 
70 


42 
43 
44 


O 

□ 


G 
H 


71 
72 


45 




1 


73 


46 


□ 


J 


74 


47 


t w \ 

□ 


K 


75 


48 


□ 


L 


76 


49 




M 


77 


50 





N 


78 


51 


r— 1 

□ 





79 


52 


n 


P 


80 


53 


□ 


Q 


81 


54 


R 


82 
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I- 1 


s 


83 


D 


T 


84 


□ 


U 


85 




V 


86 


01 


w 


87 


IS 


X 


88 


Q] 


Y 


89 


BB 


z 


90 


ffl 
ID 




91 
92 


m 




93 






94 


a 




95 


SPACE 




96 


IJ 




97 


y 




98 


n 




99 


□ 




100 


□ 
m 




101 
102 


□ 




103 
104 



E 


55! 


105 


i — ■ 
□ 




106 


rn 




107 


i — i 




108 


m 




109 


f 1 

ED 




110 


a 




111 


H 




112 


H 




113 


H 




114 


ffl 




115 


D 




116 


LI 




117 


pi 
U 




118 


LJ 




119 


□ 




120 


i — i 

u 




121 


1 1 

□ 




122 


c 




123 


a 




124 


H 




125 


D 




126 


H 




127 



Codes 1 28-255 are reversed images of code 0-127. 
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APPENDIX 3 



ASCII and CHR$ codes 

This table shows you what character will be displayed if you 
type PRINT CHR$ (X). It also has the values you will obtain if 
you type PRINT ASC ("X") where X is any character you can 
type. The CHR$ codes also change case (lower to upper, etc), 
change colours control the printer, etc. . . 



PRINTS CHR$ 



PRINTS CHR$ 



PRINTS CHR$ 



PRINTS CHR$ 



DISABLES 



ENABLES QUO] 9 



SWITCH TO 
LOWER CASE 



10 




11 




12 


B 


13 




14 


£A 


15 


| SPACE 


16 


1 



17 
18 
19 
20 
21 
22 
23 
24 
25 
26 
27 
28 
29 
30 
31 
32 
33 



# 
$ 
% 
& 



/ 

1 
2 



34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 



3 
4 
5 
6 
7 
8 
9 



<Z 



Z> 

? 

@ 

A 

B 

C 
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PRIHTb 


ALUM 


rHIN 1 9 


vnHf 


DRIMTfi 
rnin i o 




PRINTS 


CHR$ 


V 


DO 


l*j 


Q7 


LLLI 


126 


(jritY o 


A EE 

155 


b 


oy 


LU 


yo 




127 


km 


A EC 

156 


F 


70 




99 




128 




157 


U 


/I 


□ 


-1 HA 

1UU 


ORANGE 


129 


MUM 


A CO 

loo 


if 

n 


70 

IC 


LJ 


101 




130 




A Eft 

159 


I 


73 


i — i 


102 




131 


ma 


160 


J 


74 


in 


103 




132 


E 


161 


1/ 
K 




rn 

LU 


104 


f1 


133 


i — i 
m 


162 


L 


76 


rn 
hJ 


105 


f3 


134 


r— 1 

□ 


163 


KM 


/ / 


L_l 


106 


f5 


135 


1 — 1 

LJ 


164 


N 


•TO 

78 


t_l 


107 


17 


136 


LI 


165 


O 


79 


1 1 
LJ 


108 


f2 


137 


sss 

m 


166 


P 


80 


s 


109 


(4 


138 


□ 


167 


Q 


81 


r7i 


110 


f6 


139 


Ira 


168 


R 


82 


U 


111 


f8 


140 


HI 


169 


S 


83 


r— i 

□ 

IB 

n 


112 




|141 


n 
U 

HQ 


170 


T 


84 


113 


1 SWITCH TO 
■UPPER CASE 


142 


171 


U 


85 


i — i 
U 


114 




143 


rn 
L« 


172 


V 


86 


fiiD 


115 




144 


ro 


173 


w 


87 


1 1 

u 


116 




145 


□J 


174 


V 

X 


no 

88 


Ld 


117 


Hi 


146 


1 — 1 

LJ 


175 


Y 


89 




118 




147 


Lri 


176 


£ 


90 




119 


Bra 


148 


m 


177 


r 
i 


Q1 




4 OA 
I^U 


BROWN 


149 


to 


178 


E 


92 


□ 


121 


LT. RED 


150 


ED 


179 


] 


93 


S3 


122 


GREY 1 


151 


D 


180 


T 


94 


ffl 


123 


| GREY 2 


152 


C 


181 



180 





95 


K 


124 


LTGRN. 153 


□ 


182 


B 


96 


m 


125 


LT. BLU 154 


n 


183 





184 


□ 


186 


a 


188 


E 


190 


□ 


185 




187 


ED 


189 


V 


191 



CODES 192-223 SAME AS 96-127 

CODES 224-254 SAME AS 160-190 

CODE 255 SAME AS 126 
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APPENDIX 4 



Screen and colour memory maps 

The following charts show what number to POKE to put a 
character on the screen and colour it in any of the 1 6 available 
colours. 



SCREEN MEMORY MAP 



COLUMN 

20 



1063 



t 

2023 
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COLOR MEMORY MAP 



COLUMN 

20 



55335 



55296- 

55336 

55376 

55416 

55456 

55496 

55536 

55576 

55616 

55656 

55696 

55736 

55776 

55816 

55856 

55896 

55936 

55976 

56016 

56056 

56096 

56136 

56176 

56216 

56256 



-+-H 



56295 



The values to POKE into the above colour map are as follows: 



BLACK 
WHITE 1 
RED 3 
PURPLE 4 
GREEN 5 



BLUE 6 
YELLOW 7 
ORANGE 8 
BROWN 9 



Light RED 10 
GRAY 1 1 1 
GRAY 2 12 
Light GREEN 13 



Light BLUE 14 
GRAY 3 15 
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APPENDIX 5 



Deriving mathematical functions 

Functions which are not standard in Commodore 64 BASIC 
can be calculated as follows: 



FUNCTION 


BASIC EQUIVALENT 


SECANT 


SEC(X)=l/COS(X) 


COSECANT 


CSC(X)= 1/SIN(X) 




revnxi= i/tan(xi 


INVERSE SINE 


ARCSIN(X)=ATN(X/SQR(-X'X+1)) 


INVERSE COSINE 


ARCCOS(X)= - ATN(X/SQR 




(-X'X +))) +n/2 


INVERSE SECANT 


ARCSEC(X)=ATN(X/SQR(X'X-1)) 


INVERSE COSECANT 


ARCCSC(X)=ATN(X/SQR(X*X— 1)) 




+ (SGN(X)-1*tt/2 


INVERSE COTANGENT 


ARCOT(X)=ATN(X)+tt/2 


HYPERBOLIC SINE 


SINH(X) = (EXP(X)-EXP(-X)V2 


HYPERBOLIC COSINE 


COSH(X)= (EXP(X)+ EXP(- X))/2 


HYPERBOLIC TANGENT 


TANH(X)=EXP(-XV(EXP(x)+EXP 




(-X))*2+l 


HYPERBOLIC SECANT 


SECH(X)= 2/(EXP(X)+ EXP(- X)) 


HYPERBOLIC COSECANT 


CSCH(X)= 2/(EXP(X)- EXP(-X)) 


HYPERBOLIC COTANGENT 


COTH(X)=EXP(-X)/(EXP(X) 




-EXP(-X))*2+1 


INVERSE HYPERBOLIC SINE 


ARCSINH(X)=LOG(X + SQR(X*X+l)) 


INVERSE HYPERBOLIC COSINE 


ARCCOSH(X)=LOG(X+SQR(X'X-l)) 


INVERSE HYPERBOLIC TANGENT 


ARCTANH(X)= LOG(( 1 + X)/( 1 - X))/2 


INVERSE HYPERBOLIC SECANT 


ARCSECH(X)= LOGKSQR 




(-X'X+D+l/X) 


INVERSE HYPERBOLIC COSECANT 


ARCCSCH(X)= LOG((SGN(X)'SQR 




(X'X+l/x) 


INVERSE HYPERBOLIC COTAN- 


ARCCOTH(X)=LOG((X+lV(x-l)V2 


GENT 
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APPENDIX 6 



Pinouts for Input/Output devices 

The following charts show what can be connected to you 
Commodore 64 and where. 



1) Game I/O 

2) Cartridge Slot 

3) Audio/Video 



4) Serial I/O (Disk/Printer) 

5) Modulator Output 

6) Cassette 

7) User Port 



Control Port 1 



Pin 


Type 


Note 


1 


JOYAO 




2 


J0YA1 




3 


JOYA2 




4 


JOYA3 




5 


POT AY 




6 


BUTTON A/IP 




7 


+ 5V 


MAX. 50mA 


B 


GND 




9 


POT AX 





1 2 3 4 5 
O O O O O 



Control Port 2 



Pin 


Type 


Note 


1 


JOYBO 




2 


-JOYB1 




3 


JOYB2 




4 


JOYB3 




5 


POT BY 




6 


BUTTON B 




7 


+SV 


MAX. 50mA 


8 


GND 




9 


POT BX 





1 2 3 4 5 
O O O O O 
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Cartridge Expansion Slot 



Pin 


Type 


22 


GND 


21 


CDO 


20 


CD1 


19 


CD2 


18 


CD'S 


17 


CD4 


16 


CDS 


15 


CD6 


14 


CD7 


13 


DMA 


12 


BA 




Pin 


Type 


Z 


GND 


Y 


CAO 


X 


CA1 


w 


CA2 


V 


CA3 


u 


CA4 


T 


CAS 


S 


CA6 


R 


CA7 


P 


CA8 


N 


CA9 



Pin 


Type 

UC 


1 1 


ROML 


10 


1/02 


<f 


EXROM 


8 


GAME 


7 


1/01 


6 


Dot Clock 


5 


CR/W 


4 


IRQ 


3 


+ 5V 


2 


+ 5V 


1 


GND 



Pin 


Type 


M 


CA10 


I 


CA11 


K 


CA12 


J 


CA13 


H 


CAM 


F 


CA15 


E 


S02 


D 


NMI 


C 


RESET 


B 


ROMH 


A 


GND 



12 3 4 5 8 7 8 9 10 11 12 13 14 1516 17 18 192021 22 



ABCDEFHJKLMNPRSTUVWXVZ 



Audio/Video 



Pin 


Type 


Note 


1 


LUMINANCE 




2 


GND 




3 


AUDIO OUT 




4 


VIDEO OUT 




5 


AUDIO IN 
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Serial I/O 



Pin 


Type 


1 


SERIAL SRQIN 


2 


GND 


3 


SERIAL ATN IN/OUT 


4 


SERIAL CLK IN/OUT 


5 


SERIAL DATA IN/OUT 


6 


RESET 



Cassette 



Pin 


Type 


A-l 


GND 


B-2 


+ 5V 


C-3 


CASSETTE MOTOR 


D-4 


CASSETTE READ 


E-5 


CASSETTE WRITE 


F-6 


CASSETTE SENSE 



User I/O 



Pin 


Type 


1 


GND 


2 


+5V 


3 


RESET 


4 


CNT1 


5 


SP1 


6 


CNT2 


7 


SP2 


8 


PC2 


9 


SER. ATN IN 


10 


9 VAC 


1 1 


9 VAC 


12 


GND 



Note 



MAX. 100 mA 



MAX. 100 mA 
MAX. 100 mA 
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Pin 


Type 


Note 


A 


GND 




B 


FLAG2 




C 


PBO 




D 


PB1 




E 


PB2 




f 


PB3 




H 


PB4 




J 


PB5 




K 


PB6 




L 


PB7 




M 


PA2 




N 


GND 





1 2 3 4 5 6 7 8 9 10 11 12 
■ ■■■■■■■■■■■ 



ABCDEFHJKLMN 
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APPENDIX 7 



Error message 

This appendix contains a list of all the error messages generated 
by the Commodore 64 and the reasons that they occur. 

BAD DATA String data was received from an open file, but the 
program was expecting numeric data. 

BAD SUBSCRIPT The program was trying to reference an 
element of an array whose number is outside of the range 
specified in the DIM statement. 

CAN'T CONTINUE The CONT command will not work, either 
because the program was never RUN, there has been an error 
or a line has been edited. 

DEVICE NOT PRESENT The required I/O device was not 
available for an OPEN, CLOSE, CMD, PRINT #, INPUT # or 
GET#. 

DIVISION BY ZERO Division by zero is a mathematical oddity 
and not allowed. 

EXTRA IGNORED Too many items of data were typed in 
response to an INPUT statement. Only the first few items were 
accepted. 

FILE NOT FOUND If you were looking for a file on tape and an 
'END-OF-TAPE' marker was found. If you were looking on 
disc, and no file with that name exists. 

FILE NOTOPEN The file specified in a CLOSE, CMD, PRINT # , 
INPUT f or GET f , must first be OPENed. 

FILE OPEN An attempt was made to open a file using the 
number of an already open file. 
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FORMULA TOO COMPLEX The string expression being 
evaluated should be split into at least two parts for the system 
to work with or a formula has too many parenthesises. 

ILLEGAL DIRECT The INPUT statement can only be used 
within a program, and not in direct mode. 

ILLEGAL QUANTITY A number used as the argument of a 
function or statement is out of the allowable range. 

LOAD There is a problem with the program on tape. 

NEXT WITHOUT FOR This is caused by either incorrectly 
nesting loops or having a variable name in a NEXT statement 
which doesn't correspond with one in a FOR statement. 

NOT INPUT FILE An attempt was made to INPUT or GET data 
from a file which was specified to be for output only. 

NOT OUTPUT FILE An attempt was made to PRINT data to a 
file which was specified as input only. 

OUT OF DATA A READ statement was executed but there is 
no data left unREAD in a DATA statement. 

OUT OF MEMORY There is no more RAM available for 
program or variables. This may also occur when too many FOR 
loops have been nested, or when there are too many GOSUBs 
in effect. 

OVERFLOW The result of a computation is larger than the 
largest number allowed, which is 1 .70141884E + 38. 

REDIM'D ARRAY An array may only be DIMensioned once. If 
an array variable is used before that array is DIM'd, an 
automatic DIM operation is performed on that array setting the 
number of elements to ten, and any subsequent DIMs will 
cause this error. 

REDO FROM START Character data was typed in during an 
INPUT statement when numeric data was expected. Just re- 
type the entry so that it is correct, and the program will continue 
by itself. 
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RETURN WITHOUT GOSUB A RETURN statement was 
encountered, and no GOSUB command has been issued. 

STRING TOO LONG A string can contain up to 255 characters. 

7SYNTAX ERROR A statement is unrecognizable by the 
Commodore 64. A missing or extra parenthesis, misspelled 
keywords, etc. 

TYPE MISMATCH This error occurs when a number is used in 
place of a string, or vice versa. 

UNDEF'D FUNCTION A user defined function was referenced, 
but it has never been defined using the DEF FN statement. 

UNDEF'D STATEMENT An attempt was made to GOTO or 
GOSUB or RUN a line number which doesn't exist. 

VERIFY The program on tape or disc does not match the 
program currently in memory. 
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APPENDIX 8 



Music note values 

The following table contains a list of all the notes, their sharps 
and octaves and the respective numbers to POKE in order to 
obtain the notes. (POKE into the low and high frequency 
registers of the sound chip.) 



PIOT0 


Note— Octave 


Hi Freq 


low Freq 


ft 


C-0 


1 


18 


1 
1 


C#-0 


' 


35 


o 


D-0 


1 


52 


3 


uw—\j 




70 


4 


E-0 




90 


5 


F-0 




110 


6 


F#-0 




132 


7 


G-0 




155 


8 


G#-0 




179 


9 


A-0 




205 


10 


A#-0 




233 


11 


B-0 


2 


6 


12 


C-l 


2 


37 


13 


C#-l 


2 


69 


14 


D-l 


2 


104 


15 


D#-l 


2 


140 


16 


E-l 


2 


179 


17 


F-l 


2 


220 


18 


F#-l 


3 


8 


19 


G-l 


3 


54 


20 


G#-l 


3 


103 


21 


A-l 


3 


155 


22 


A#-l 


3 


210 


23 


B-l 


4 


12 


24 


C-2 


4 


73 


25 


C#-2 


4 


139 


26 


D-2 


4 


208 
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27 
28 
29 
30 
31 
32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 

61 

62 

63 

64 

65 

66 

67 

68 

69 

70 

71 



D#-2 


5 


25 


E-2 


5 


103 


F-2 


5 


185 


F#-2 


6 


16 


G-2 


6 


108 


G#-2 


6 


206 


A— I 


7 


53 


A#-2 


7 


163 


B— 2 


8 


23 


C— 1 


8 


147 


C#-3 


9 


21 


D— 3 


9 


159 


D#-3 


10 


60 


t — o 


10 


205 


F— 3 


11 


114 


F#-3 


12 


32 


C._ r \ 
o — o 


12 


216 




13 


156 




14 


107 


Ait 1 


15 


70 


D— o 


16 


47 


V— — ** 


17 


37 


C#-4 


18 


42 


L» — ** 


19 


63 


L/TT — ** 


20 


100 


c — *» 


21 


154 


r — *♦ 


22 


227 


F#-4 


24 


63 


G-4 


25 


177 


G#-4 


27 


56 


A-4 


28 


214 


A#-4 


30 


141 


B-4 


32 


94 


C-5 


34 


75 


C#-5 


36 


85 


u — J 


38 


126 


D#-5 


40 


200 


c r 

c — 3 


43 


52 


F-5 


45 


198 


F#-5 


Aft 


127 


G-5 


51 


97 


G#-5 


54 


111 
1 1 1 


A-5 


57 


172 


A#-5 


61 


126 


B-5 


64 


188 




196 





71 
/ 1 


C-6 


68 


149 


73 


C#-6 


72 


169 


/4 


D-6 


76 


252 


/D 


D#-6 


81 


161 


7A 


t— o 


86 


105 


77 


F6 




140 


78 


F#— 6 


OA 

vo 


254 


79 


o — o 


1 uz 


1 OA 


80 


OTT — O 


i nn 
1 uo 


J 


81 


A— 6 


1 1 3 


DO 

bo 


82 


A#-6 


122 


CI 


83 


B-6 




1 20 


84 


C-7 


137 


4 J 


85 


C#-7 


1 43 




86 


D-7 


i 11 

1 3J 


*4/ 


87 


D#-7 


1 At 


J 1 


88 


E-7 


1 / Z 


niA 

z 10 


89 


F-7 


183 


25 


90 


F#-7 


193 


252 


91 


G-7 


205 


133 


92 


G#-7 


217 


189 


93 


A-7 


230 


176 


94 


A#-7 


244 


103 



MEMORY MAP 


HEX 


DECIMAL 


0000 





0001 


1 


0003 -0004 


3-4 


0005 -0006 


5-6 


0007 


7 


0008 


8 


0009 


9 


000A 


10 


000B 


11 


000C 


12 


000D 


13 



DESCRIPTION 

Chip directional register. 

Chip I/O: memory paging and 

tape control. 

Float-fixed vector. 

Fixed float vector. 

Search character. 

Scan quotes flag. 

TAB column save (temporary). 

0=LOAD , 1 = VERIFY. 

Input buffer pointer / f 

subscript. 

Default DIM flag. 

Type : FF = string , 00 = 

numeric. 
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000E 




14 




000F 




15 




VV 1 V 




16 




fflfiH 1 
VK) I I 




17 




0012 




18 




\J\J 1 o 




19 




WO 1 H 


0015 


20- 


21 


VfO 1 D 




22 




0017- 


0018 


23- 


24 


00iy— 




9R- 


-33 


002Z- 




OA_ 
OH" 


O / 


00zb- 


(MO A 


OQ_ 

oo 


-42 


002B- 


-002C 


43- 


-44 




MIC 


*rJ 


-46 


002F- 


-0030 


47- 


-48 


0031- 


-0032 


49- 


-50 






51 - 


-52 


0035- 


-0036 


53- 


-54 


0037- 


-0038 


55- 


-56 






57- 


-58 


(TWIST R 


— WvOVs 


59 


-60 


noon 


— VWOC 


61 


-62 


iwor 


-0040 


63 


-64 


0041 


-0042 


65 


-66 


0043 


-0044 


67 


-68 


0045 


-0046 


69 


-70 


0047 


-0048 


71 


-72 


0049 


-004A 


73 


-74 



Type : 80 = integer , 00 = 

floating point. 

DATA scan/ LIST 

quote/ memory flag. 

Subscript/ FNx flag. 

= INPUT , 40 = GET , 98 = 

READ (Hex). 

ATN sign /comparison 

evaluation flag. 

Current I/O prompt flag. 

Integer value. 

Pointer : temporary string 

stack. 

Last temporary string vector. 
Stack for temporary strings. 
Utility pointer area. 
Product area for multiplication. 
Pointer. . .start of BASIC in 
low/high byte order. 
Pointer. . .start of variables. 
Pointer. . .start of arrays. 
Pointer. . .end of arrays. 
Pointer. . .string storage 
(moving down). 
Utility string pointer. 
Pointer. . .limit of memory (top 
of the memory for BASIC). 
Current BASIC line number. 
Previous BASIC line number. 
Pointer. . .BASIC statement 
for CONT. 

Current DATA line number. 
Current DATA address. 
INPUT vector. 
Current variable name. 
Current variable address. 
Variable pointer for FOR 
NEXT. 
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004 B 


-004C 


75- 


-76 


004D 




77 




004 E- 


-0053 


78- 


83 


0054- 
0057- 


-0056 
-0060 


84- 
87- 


86 
96 


0061 
0062- 
0066 
0067 


-0065 


97 
98- 
102 
103 


101 


0068 




104 




0069- 


-006E 


105 


-110 


006F 




111 




0070 




112 




0071- 


0072 


113 


-114 


0073- 


008A 


115- 


-138 


007A- 


-007B 


122 


-123 


008 B- 

0090 

0091 


-008F 


139 
144 

145 


-143 


0092 
0093 
0094 




146 
147 
148 





Y save; op-save; BASIC 
pointer save. 
Comparison symbol 
accumulator. 
Miscellaneous work area, 
pointers, etc. 

Jump vector for functions. 
Miscellaneous numeric work 
area. 

Accumulator f 1 exponent. 
Accumulator f 1 : mantissa. 
Accumulator f 1 :sign. 
Series evaluation constant 
pointer. 

Accumulator f 1 :hi-order 
(overflow). 

Accumulator f 2 exponent, 
mantissa, sign (as 97-102 
dec). 

Sign comparison, 
accumulator f 1 versus 
accumulator}: 2. 
Accumulator f 1 lo-order 
(rounding). 

Cassette buffer length/series 
pointer. 

CHRGET subroutine; get 
BASIC character. 
BASIC pointer (within 
CHRGET subroutine). 
RND function seed value. 
Status word ST. 
Keyswitch PIA :STOP and 
RVS flags. 

Timing constant for tape. 
Load = , Verify = 1 . 
Serial output : deferred 
character flag. 
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Serial deferred character. 
Tape 'End of Tape' marker 
received. 
Register save. 
How many files open. 
Input device; normally zero. 
Output CMD device; normally 
three. 

Tape character parity. 
Byte-received flag. 
Direct = $80/ RUN = 0. 
Output control. 
To pass one error 
log/character buffer. 
To pass two error log 
corrected. 

Jiffy clock (high, med, and 
low.) Used to set and run Tl 
and Tl$:. 
Serial bit count. 
Cycle count. 

Countdown, tape write bit 
count. 

Tape buffer pointer. 
Tape write leader count/ Rd 
pass/inbit. 

Tape write new byte/Rd 
error/inbit count. 
Tape start bit/Rd bit/st bit. 
Tape scan; cnt; Id; end byte 
assy. 

Write lead length /read 
checksum/parity. 
00AC-00AD 172-173 Pointer: tape buffer, scrolling. 
00AE-00AF 174-175 Tape ends adds/'End of 

program' marker. 
00B0-00B1 176-177 Tape timing constants. 
00B2-00B3 178-179 Pointer: start of tape buffer. 



sJSJZf «J 


149 


0096 


150 


SJV<3 • 


151 




152 


0099 


153 


009A 


154 


009B 


155 


009C 


156 


009D 


157 




158 




159 


00A0-00A2 


160-162 


00A3 


163 


00A4 


164 


00A5 


165 




166 


00A7 


167 


(MAS 


168 


00A9 


169 


00AA 


170 


00AB 


171 
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00B4 




180 




00B5 




181 




00B6 




182 




00B7 




183 




00B8 




184 




00B9 




185 




00BA 




186 




f\f\ n> p> 

00BB- 


-00BC 


187- 


-188 


00BD 




189 




00BE 




190 




00BF 




191 




00C0 




192 




00C1- 


-00C2 


193- 


-194 


00C3- 


-00C4 


1 95- 


-196 


00C5 




197 




00C6 




198 




00C7 




199 




00C8 




200 




00C9- 


-00CA 


201 - 


-202 


00CB 




203 




00CC 




204 




00CD 




205 




00CE 




206 




00CF 




207 




00D0 




208 




00D1- 


00D2 


209- 


-210 


00D3 
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1 = tape timer enabled ; bit 
count. 

Tape 'End of Tape7RS232 

next bit to send. 

Read character error/outbyte 

buffer. 

Number of characters in file 
name. 

Current logical file. 
Current secondary address. 
Current device. 
Pointer to file name. 
Write shift word/read input 
character. 

Number of blocks remaining to 
write/ read. 
Serial word buffer. 
Tape motor interlock. 
I/O start address. 
KERNAL setup pointer. 
Current key pressed (64 if no 
key). 

Number of characters in 

keyboard buffer. 

Screen reverse flag. 

End of line for input pointer. 

Input cursor log (row, 

column). 

Same as 197. 

= flash cursor. 

Cursor timing countdown. 

Character under cursor. 

Cursor in blink phase. 

Input from screen/from 

keyboard. 

Pointer to screen line. 
Position of cursor on above 
line. 
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00D4 




zlz 




V — CUled CfUloUl, eloe 
nrAnrQirimoH 

proyi ct 1 1 ii i iou . 


00D5 




Z 1 o 




f"*iirront crropn linP Ipnntn 
vvUlieill oUi ecu ii i its iciiyui. 


00Db 




01 A 
Z 1 •* 




Daia/ \A/hprP purQnr lix/pc. 
nuvv wi ioi o uuiovi iivcoi 


00D7 




OIK 

Z I 




1 act IMKFY/rhprkciim/huffpr 


00Do 




TIC 

Z 1 D 




Mumhpr nf INI^FRT*; 

iMUIIIUel Ol 1 1 M O L n 1 o 








r\i itctanHinn 
OU loldl iuii ly ■ 


00D9- 


-00F2 


zl / - 


OAO 

Z4Z 


C^roan Una 1 i r\ L - taktip 
OCrccM Mile IIIIR. IdUle. 


00F3- 


/VAC/1 


OA'S 
ZHo — 


Ztt 


Qrroon r*nlmir nnintpr 

Owl 6el 1 LUIUUI JJWIIILd. 


00F5- 


00rb 


OA K 
Z40- 


OAR 


IxcyuOdlU puuiLci. 


00F7- 


00F8 


247- 


248 


RS232 Rev pointer. 


00F9- 


0OFA 


O /I O 

z49- 


-zbW 


DCOQO Tv r\r\ i n tor 

nozoz i x pointer. 


00FB- 


-00rb 


ZDl - 


OCR 
"ZbO 


rr cu £oi o pdy e 1 1 ioi i y ■ 


00FF- 




OCR 


ORR 

-zbo 


Flnatinn to A^PII work ftTPd 
niOdllliy LU mov^ii vvui ix ai c«i 


0100- 


013E 


OCC 
ZOD- 


-o I O 


i ape error loy. 


0100- 


01 rr 


ZOD- 


K1 1 

-O I I 


Pmroccnr otar*W arpa (thp 
rlUwdoUl oldOlx oica \Liie 

old UK. J . 


AO fhf\ 

0200- 


0Zbo 


K1 O 

bl z- 




RA^IP innut huffpr 

DMOIU llipUL UUIiei. 


0259- 


-Iflzbz 


R0k1 


R1U 

-b i iff 


1 joqI flip takllp 
LUyiUdl llle iduic. 


0263- 


-026C 


bl 1 - 


Ron 
- bzu 


r^/-v» i\r*a r\ 1 1 rvihor tartlp 
UcVICe nurnUer IdUle. 


026D- 


-0276 


621- 


-630 


Secondary address table. 


/*o~n 

0277- 


/AO OA 

-0280 


CO 1 


-O4I0 


\f c%\ /h\/-\or/H \r\t if for 
IxcyDOaru UUIIef. 


02o1 - 


fllOQO 

-Wzoz 


R A 1 


-O'tZ 


O Ldl L vJl Dr\o 1 1 1 lei i iui y ■ 


0283- 


-0284 


C AO 

b4d- 




1 Op OT DMoll' ITltJiIIUIy. 


0285 




o45 




oeriai dus tirneoui iidy. 


0286 




646 




ourrent colour coae 
(cnardCiersj. 


0287 




C A "7 

o4/ 




ooiour unoer cuioui. 


0288 




RA Q 




OUieell 1 1 lei i ioi y paye. 


0289 




b49 




iVIaXirnUrn oIZe Ol Kcyuudiu 








buffer. 


028A 




650 




Keyboard repeat (128 = repeat 








all kpvQ 1 °7 = none) 

ciii i\eyO/ i 1 i iui i^f ■ 


028B 




651 




Repeat speed counter. 


028C 




652 




Repeat delay counter. 


028D 




653 




Keyboard shift/CTRL flag 








(PEEKed to find if SHIFT, etc, 
pressed. 
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(fiOQP 

wzot 




DD't 




V/Zor- 




crc 
DDO ■ 


— ODD 


V)ZH 1 




DO/ 








erg 
ODo 




ti/yo 




ooy 








ODU 




lozyo- 


-w/yo 


DO I ■ 


RR*> 

— bbz 


wzy / 




DDO 




filOQQ 
WZyo 




RRA 
DD4 




(flzyy- 


-wzyA 


bob" 


RRR 

— bbb 


vzy d 




RR~J 








DOo 








bby 




wzy t 




o/w 




wzy r- 


no act 


D/ I - 


RTi 

— b/z 


(AO A 1 
WZA I 




R11 

b/o 




<7W AO 
10ZAZ 




R1A 




IflZAo 




0/0 




fliO A^ 
WZA4 




0/D 




WZAD 




b/ / 




WZUW- 


f7IO EC 

-Wzrb 


/SJH- 


~IRR 

- /bb 




Wo 101 


/bo- 


- /by 


0302- 


-0303 


770- 


-771 


0304- 


-0305 


772 


-773 


0306- 


-0307 


774 


-775 


0308- 


-0309 


776 


-777 


030A- 


-030B 


778 


-779 


030C 




780 




030D 




781 








"7QO 

/oz 




030F 




783 




0310- 


-0311 


784- 


-785 


0314- 


-0315 


788 


-789 



Last shift pattern. 
Keyboard table setup pointer. 
Keyboar shift mode. 
= scroll enable. 
RS232 control register. 
RS232 command register. 
Bit timing. 
RS232 status. 
Number of bits to send. 
RS232 speed/code. 
RS232 receive pointer. 
RS232 input pointer. 
RS232 transmit pointer. 
RS232 output pointer. 
IRQ save during tape I/O. 
CIA 2 (NMD interrupt control. 
CIA 1 timer A control log. 
CIA 1 interrupt log. 
CIA 1 timer A enabled flag. 
Screen row marker. 
Block 1 1 for sprite data. 
Error message link. 
BASIC warm start link. 
Crunch BASIC tokens link. 
PRINT tokens link. 
Start new BASIC code link. 
Get arithmetic element link. 
System temporary storage of 
accumulator. 

System temporary storage of 
the X register. 

System temporary storage of 
the Y register. 

System status register storage. 
USR function jump (normal 
B248). 

Hardware interrupt vector 
(IRQ) (normal EA31). 
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0316- 


0317 


790-791 


Break interrupt vector (normal 








FE66). 


0318- 


0319 


792-793 


NMI interrupt vector (normal 








FE47). 


031 A- 


-031 B 


794-795 


OPEN vector (normal F34A). 


031 C- 


-031 D 


796-797 


CLOSE vector (normal F291 ). 


031 E- 


031 F 


798-799 


Set INPUT vector (normal 








F20E). 


0320- 


0321 


800-801 


Set OUTPUT vector (normal 








F250). 


0322- 


-0323 


802 - 803 


Restore I/O vector (normal 








F333). 


0324- 


-0325 


804-805 


INPUT vector (normal F157). 


0326- 


-0327 


806-807 


Output vector (normal F1CA). 


0328- 


-0329 


808 -809 


Test STOP vector (normal 








F6ED). 


032A- 


-032B 


810-81 1 


GET vector (normal F13E). 


032 C- 


-032D 


812-813 


Abort I/O vector (normal 








F32F). 


032E- 


-032F 


814-815 


Warm start vector (normal 








FE66). 


0330- 


-0331 


816-817 


LOAD link (normal F4A5). 


0332- 


-0333 


818-819 


SAVE link (normal F5ED). 


033 C 


-03 FB 


828-1019 


Cassette buffer. 


0340- 


-037E 


832-894 


Block 13 for sprite data. 


0380- 


-03BE 


896-958 


Block 14 for sprite data. 


03 CO- 


-03FE 


960-1022 


Block 1 5 for sprite data. 


MOO- 


-07E7 


1024 -2023 


Screen memory. 


07F8- 


-7FFF 


2040-2047 


Pointers for sprite data. 


0800- 


-9FFF 


2048 -40959 


BASIC RAM memory. 


A000- 


-BFFF 


40960-49151 


BASIC ROM. 


A000- 


-BFFF 


40960-49151 Paged RAM (behind ROM). 


8000- 


-9FFF 


32768-40959 Alternative ROM plug in area. 


C000- 


-CFFF 


49152-53247 RAM (useable in machine code 








only). 


D000 


-D02E 


53248-53294 Video Chip. 


D000 




53248 


Sprite X component. 


D001 




53249 


Sprite Y component. 
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D002 


53250 


SDrite 1 X comDonent 

x^ 1 1 i w i # x wx^ i i ii^v/i i \j i 1 1 ■ 


D003 


53251 


Sorite 1 Y comDonent 

x^ yj i i xw 1 1 V-/ vy l i \VJ \J 1 1 wi Hi 


D004 


53252 


Sorite 2 X comDonent 


D005 


53253 


Sprite 2 Y component. 


D006 


53254 


Sorite 3 X comDonent 


D007 


53255 


Sorite 3 Y comDonent 


D008 


53256 


Sorite 4 X comDonent 

i i iw r x x wx^i i i k-/ v./ 1 ivi iii 


D009 


53257 


Sorite 4 Y comDonent 

\ m f iy I I IXs T 1 Wwl 1 1 mJ^J m 1 X^ 1 1 L ■ 


D00A 


53258 


Sorite 5 X romnonpnt 

X-J yJ* 1 L V-r v/ ^ X Vrwl 1 IL/X^I Ivl 1 Li 


D00B 


53259 


SnritP 5 Y romnonpnt 


D00C 


53260 


SnritP 6 X romnonpnt 


D00D 

L/V/VL-/ 


53261 


Qnritp fi Y rnmnnnpnt 

OLJIILxs \J 1 UUI 1 IfJwl IC7I 1 L. 


D00E 


53262 


Sorite 7 X comDonent 

ft^ I 1 1%/ # XX wwl 1 1 W 1 1 w 1 Hi 




5326? 


Qnritp 7 Y pnmnnnpnt 


D010 


53264 


MSB of X co-ordinate (for last 

i v i x-^ k« V-/ 1 v~/ v</ vy i vj 1 1 ivi i w \ i xv i i vi w i 






Dart of screen) 

wJ VI l I v# 1 w^^l X/ X/ 1 1 / ■ 


D01 1 


53265 


Rit rr\7\Y\v\frc\ mnHp and v/pi-timl 

UlL II 1 CI fJLJxsvl 1 1 1 UUC Cll 1 VJ V \7I LI IsOl 






hiypI Qprnllinn 
|Jiaci oui uiiii ly . 


D012 


53266 


Ractpr 
i moici • 


D013 

LJv 1 xJ 


53267 


1 inht npn X rnmnnnpnt 

LIUI I L Uv 1 1 XX vU 1 1 lv7l 1 L ■ 


D014 


53268 


1 inht npn Y rnmnnnpnt 

L-lvJHL LJxvl 1 1 xsxJI 1 l|JUI Id 1 L ■ 


D015 


53269 


Snrite enablp (ONI/OFF) 


D016 


53270 


Spt multicolour rharartpr 

xJ vTL 1 1 lUILIV/vlxJUl vm 1 Gil vlxs IUI 






mnHp y tjprnll fniYPh 

1 1 IUUC ■ A. Ovrl Ull \ |_/I/Vx7l / ■ 


D017 


53271 


Sorite exnand Y 

WUI llv ^S/XI^VIV 1X4 1 ■ 


D018 


53272 


Screen character memorv 

vxwi wv^i i vfi ivii uviui i i i^si i ixxi y 






Ifhannp rharartPr *>p+ nnintpr^ 

IQI I^C vfllCIIClvr LCI OvTL kVUII 1 Lx7l / ■ 


D019 


53273 


Intprrunt rpnupst^ 

1 1 1 Ivl 1 U|Jl 1 v7vf vl v70 LO ■ 


D01 A 


53274 


Intprrunt rpnupst MASKS 

III Ivl 1 \J yj L 1 vrvf vl vrO L 1 V 1 /» VJ 1 X X-/ 






(di^ahlp snritp intprrunt^) 

\ IOIIU 1 w 1 1 Lv III ICI 1 vJ yJ LO / • 


D01 B 


53275 


Rarknrni ind /<*nritP nrinritv 

LJ Cl L>fxy 1 UUI IU / OLsl 1 LC yJ 1 IxJI 1 L y ■ 


D01 C 


53276 

JUL / \J 


IWI 1 1 Itirnlni ir cinri+p mr»Hp 

IVI li 1 LI UUIUU 1 O^JIILC 1 1 lUUU! 






o pi lit? CApOMxJ I . 


D01E 


53278 


Sprite/sprite collision. 


D01F 


53279 


Sprite/background collision. 


D020 


53280 


Border colour. 


D021 


53281 


Screen colour. 


D022 


53282 


Multicolour 1 for characters 
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(bit pair 01 ). 


D023 


53283 


Multicolour 2 for characters 






(bit pair 10). 


D024 


53284 


Background 3. 


D025 


53285 


Sprite (all) multicolour 1 (bit 






pair 01 ). 


D026 


53286 


Sprite (all) multicolour 2 (bit 






pair 11). 


D027 


53287 


Sprite foreground colour (in 






multicolour it is bit pair 1 0). 


D028 


53288 


Sprite 1 foreground colour (in 






multicolour it is bit pair 10). 


D029 


53289 


Sprite 2 foreground colour (in 






multicolour it is bit pair 10). 


D02A 


53290 


Sprite 3 foreground colour (in 






multicolour it is bit pair 10). 


D02B 


53291 


Sprite 4 foreground colour (in 






multicolour it is bit pair 10). 


D02C 


53292 


Sprite 5 foreground colour (in 






multicolour it is bit pair 10). 


D02D 


53293 


Sprite 6 foreground colour (in 






multicolour it is bit pair 10). 


D02E 


53294 


Sprite 7 foreground colour (in 






multicolour it is bit pair 10). 


D400-D41C 


54272- 


-54300 Sound chip (SID). 


D400 


54272 


Voice 1 low frequency. 


D401 


54273 


Voice 1 high frequency. 


D402 


54274 


Low pulse (pulse waveform 






only) voice 1 . 


D403 


54275 


High pulse (pulse waveform 






only) voice 1 . 


D404 


54276 


Waveform voice 1 . 


D405 


54277 


Attack/decay voice 1 . 


D406 


54278 


Sustain/release voice 1 . 


D407 


54279 


Low frequency voice 2. 


D408 


54280 


High frequency voice 2. 


D409 


54281 


Low pulse (pulse waveform 






only) voice 2. 
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D40A 


54282 


High pulse (pulse waveform 






only) voice 2. 


D40B 


54283 


Waveform voice 2. 


D40C 


54284 


Attack/decay voice 2. 


D40D 


54285 


Sustain/release voice 2. 


D40E 


54286 


Low frequency voice 3. 


D40F 


54287 


High frequency voice 3. 


D410 


54288 


Low pulse (pulse waveform 






only) voice 3. 


D41 1 


54289 


High pulse (pulse waveform 






only) voice 3. 


D412 


54290 


Waveform voice 3 . 


D413 


54291 


Attack/decay voice 3. 


D414 


54292 


Sustain/release voice 3. 


D415 


54293 


Low cutoff frequency (0—7) 


D416 


54294 


High cutoff frequency 






(0-255). 


D417 


54295 


Resonance (bits 4—7). 






Filter voice 3 (turn off) bit 2 






Filter voice 2 (bit 1 ) 






Filter voice 1 (bit 0). 


D418 


54296 


High pass filter (bit 6). 






Low pass filter (bit 4). 






Band pass filter (bit 5). 






Master volume control (bits 






0_3 (0-15)) 


D800-DBFF 


55296- 


56295 Colour (screen) memory. 


D419 


54297 


Read paddle X ) 


D41A 


54298 


Read paddle Y ) 






) READ 






) ONLY 


D41B 


54299 


Noise (random) ) 


D41C 


54300 


Envelope 3 ) 



DC00- DC0F 56320-56335 Interface chip 1 (IRQMCIA 

6526). 

(See block diagrams.) 



207 



DD00-DD0F 56576-56591 Interface chip 2(NMI)(CIA 

6526). 

(See block diagrams.) 
E000-FFFF 57344-65535 ROM: operating system 

(KERNAL). 

E000-FFFF 57344-65535 RAM(paged in). 
FF81-FFF5 65409 - 65525 Jump table (to KERNAL 

subroutines). 



KERNAL subroutine (User callable) 



ACPTR 


rrAb 


CCA A C 

bb44b 


Input byte from serial port. 


CHKIN 


rrCb 


CCA~IO 

bb4/o 


Open channel for input. 


CHKOUT 




CCA O 1 

bb4o 1 


Open channel for output. 


z~» i miM 

CHRIN 


FrLr 


CCA 0~I 

bb4o/ 


Input character from channel. 


/\i 1 O 1 IT" 

CHROUT 


rpp\0 

rrDZ 


CCAQfll 


Output character to channel. 








iLUA witn Aooii coae men 








IQR tn rvrmt a pharantor 

jon rruz to print a oiiaiauici 








on ine screen in maor iinc 








code.) 


LIOU 1 


rr 1 o 


CCA AO 

bb44o 


uutput uyte to serial cnannei. 


y\ i All 

CLALL 


pm 

FFE7 


CCC 1 1 

b551 1 


Close all channels or files. 


CLOSE 


FFC3 


65475 


Close specified logical file. 


CLRCHN 


FFCC 


65484 


Close all input and output 








channels. 


GETIN 


FFE4 


65512 


Get character from keyboard 








buffer. 


IOBASE 


FFF3 


65523 


Returns base address of I/O 








devices. 


LISTEN 


FFB1 


65457 


Command devices on the 








serial bus to listen. 


LOAD 


FFD5 


65493 


Load RAM from a device. 


MEMBOT 


FF9C 


65436 


Read/set the bottom of 








memory. 


MEMTOP 


FF89 


65433 


Read/set the top of memory. 


OPEN 


FFC0 


65472 


Open a logical file. 


PLOT 


FFF0 


65520 


Read/set X,Y cursor position 








Load X with X co-ordinate 
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RDTIM 


FFDE 


65502 


RCAniT 
ntMUo 1 


PPR7 

rrD; 


OD-tOo 


D CCTAQ 

nto 1 Un 


rroA 


OD'f I D 


C A\/C 


rrUB 


OD'tyo 




rrSr 


RCJOQ 

ODt-oy 




rrbU 


ODD 1 / 


SECOND 


FF93 


65427 


SETLFS 


FFBA 


65466 


SETMSG 


FF90 


65424 


SETNAM 


FFBD 


65469 


Sbl MM 


FFDB 


65499 


Shi 1 MO 


FFA2 


65442 


CTAD 

b 1 Ur 


rrr-i 

rrt 1 


CCCfliE 

ODDUK3 


TALK 


FFB4 


65460 


TKSA 


FF96 


65430 


UDTIM 


FFEA 


65514 


UNLSN 


FFAB 


65454 


UNTALK 


FFAB 


65451 


VECTOR 


FF84 


65412 



(1-40) and Y with Y co- 
ordinate then JSR FFF0 (or 
65520 in BASIC) by POKEIng 
into 781 and 782 (X and Y 
register storage). 
Read real time clock. 
Read status word. 
Restore default I/O vectors. 
Save RAM to a device. 
Scan keyboard. 
Returns X,Y organisation of 
screen. 

Send secondary address after 
LISTEN. 

Set logical first and second 
addresses. 

Control KERNAL messages. 

Set file name. 

Set real time clock. 

Set timeout on serial bus. 

Scan stop key. 

Command serial bus device to 
TALK. 

Second secondary address 
after TALK. 

Increment real time clock. 
Command serial bus to 
UNUSTEN. 
Command serial bus to 
UNTALK. 

Read/set vectored I/O. 



PROCERROR SOUND, CIA 1 AND CIA 2 BLOCK 
DIAGRAMS 

Following are charts which contain the memory addresses and 
functions of the sound chip and the two CAIs. 
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VI 


V2 


V3 


SID (o5o 1 ) Commodore o4 




VI 


V2 


D400 
D40I 


D407 
D408 


D40E 
D40F 


Frequency 


L 
H 


54272 
54273 


54279 
54280 


D402 


D409 


D4I0 


Pulse Width 


L 


54274 


54281 


D403 


D40A 


D4II 


i 

o o o o '; 


H 


54275 


54282 


D404 


040 B 


D412 


Voice Type 
NSE PUL SAW TRl | 


Key 


54276 


54283 


D405 


D40C 


D4I3 


Attack Time Decay Time 
2 ms - 8 sec 1 6 ms - 24 sec 
i i i 1 i i l... 


54277 


54284 


D406 


D40D 


D4I4 


„ , . , , Release Time 
Sustain Level 6 ms -24 sec 
i i i 1 i i i 


54278 


54285 



Voices 
(W rite Only) 



D4I5 


O 


o o o o I 


L 


54293 


D4I6 




Filter Frequency 


H 


54294 


D4I7 




D, m ...,, Filter Voices 
Resonance £XT y3 y2 

I • 111 L 


VI 


54295 


D4I8 


V3 
Off 


Passband Master 
Hi Bd Lo l Volume 
i ■ i I 1 1 1- 




54296 



Filter 8c Volume 
(Write Only) 



D4I9 Paddle X 54297 

D4IA Paddle Y 54298 

D41B Noise 3 (Random) 54299 

D41C Envelope 3 | 54300 

Sense 

(Read Only) 



Special voice features (TEST, RING MOD, SYNC) 
are omitted from the above diagram. 
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Processor I/O Port (6510) Commodore 64 



$0000 
$0001 



IN IN 
I 


Out ( IN ( Out 


Out ( Out ( Out 




Tape Tape Tape 
Motor | Sense j Write 


D ROM EF.RAM AB.RAM 
Switch ^ Switch | Switch 



DDR 
PR 



CIA 1 (IRQ) (6526) Commodore 64 



SDC00 


Paddle SEL 
_A J5 


1 I joystick 
J [_ R L D 

Keyboard Row Select (Inverted) 


U 


rKA 


SDC01 


Joystick I 
Keyboard Column Read 


PRB 


SDC02 


$FF — All Output 


DDRA 


$DC03 


S00- All Input 


DDRB 


$DC04 
$DC05 






Timer A 








TAL 
TAH 


SDC06 
$DC07 






Timer B 








TBL 
TBH 




/ 












r 


■S 


SDC0D 


1 1 


Tape 
Input 


1 


Timer 
B 


Interr. 
A 

1 


ICR 


SDC0E 


1 


1 




One 
Shot | 


Out lime 
., , PB6 

Modc | Ou. 


Timer 
|A Start 


CRA 


SDC0F 


1 


1 




One 
Shot | 


Out r ' me 
Mode | Out 


Timer 
( B Start 


CRB 



56321 



56324 
56325 
56326 
56327 
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CIA 2 (NMI) 



(6526) 



Commodore 64 



SDDOO 


Serial 
In 


' Clock ' Serial ' 
In Out 


Clock' 
Out 


ATN 
Out 


'RS-232 
i 0ul i 






PRA 


SDD01 


DSR 
In 


1 CTS 1 |DCD*| 
•in 1 1 In 1 

Parallel User Port 


Rl* 
In 


DTR 
1 Out 1 


RTS 
Out 


RS-232 
In 


PRB 


$DD02 


IN 


IN Out 


Out 


Out 
$3F 


Out 


Out 


Out 


DDRA 


$DD03 


$06 For RS-232 


DDRB 


$DD04 
$DD05 






Timer A 








TAL 
TAH 


$OD06 
$DD07 






Timer B 








TBL 
TBH 


r 














/ 




$DD0D 




RS-232 
In 




Timer 
B 


Timer 
1 A 


ICR 


$DDOE 


Timer 
|A Start 


CRA 


$DD0F 


Timer 
|B Stan 


CRB 



56576 



56577 



56580 
56581 



56582 
56583 



*Connected but not used by system. 
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MASTERING THE 
COMMODORE 64 
INDEX 



Abbreviations to BASIC commands 1 59 

ABS function 28 

Accumulator 95 

ADC 113-114 

Addition 113-114 

Addressing modes 97-98 

A/D/S/R 51-52 

AND 30,110-111 

Animation (Basic) 45-49 

Animation (MC) 

Appendices 159-191 

Arithmetic operators 9 

Arrays 25 

ASC function 18 

ASCII character codes 1 63 - 1 64 

ASL 118 

Assembler 93-94 

ATN 27 

Attack (See ADSR) 51 



Bank selection 56 lb 
BASIC abbreviations 
BASIC commands 9- 
BASIC commands codes 
BCC 108 
BCS 108 
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BEQ 108 

BIT 113 

Bit map mode 78 

Bit map mode (multicolour) 80 lb 

BMI 109 

BNE 108 

BPL 109 

Branches and testing 108-109 
BRK 109 
BVC 108 
BVS 1 09 

Cassette 83-84 

Cassette data files 83 - 84 

Character (screen PEEKs and POKEs) 1 60 - 1 62 

CHR$ function 18,43 

CLC 115 

CLD 115 

CLI 116 

CLOSE 33 

CLR statement 1 6 

CLV 116 

CMD statement 33 

CMP 106-107 

Collision detection 

Colour memory charts 48, 1 65 

Colour registers 41 -44 

Colour screen, border colour 41 -42 

Commodore 64 memory map 

Converting Basic to machine code 120-121 

CONT command 

CTRL key 13,42 

COS function 27 

CPX 107 

CPY 107 

CRSRkeys 13 

Datasette tm recorder (see cassette) 83-84 
DATA statement 25 
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DEC 106 
Decay 51 
DEF function 26 
DEX 106 
DEY 106 

DISK DRIVE 89-90 

DIM statement 25 

Double height characters 58-60 

Editor screen 12-13 
END statement 20 
EOR 112 

Error messages 171-173 
Expansion ports 168-170 
EXP function 28 

Extended colour mode 63/b-63/c 

Files cassette 83-84 

Filtering (MUSIC) 54 

Fire button (joystick) 84-86 

FOR statement 22 

FRE (0) statement 17 

FN function 26 

Function keys (Mc program) 145-147 

Game controls and ports 
GET statement 1 6 
GET f statement 35 
GOSUB statement 20 
GOTO statement 20 

Graphics modes 55, 61 , 63b, 64, 74, 78, 80/b 
Graphics mode, bit mapped 78 -80/b 

Hexadecimal notation 96-97 
High resolution graphics 78-80/b 

IF THEN statement 21 
INC 105 
Indexing 98 
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INPUT statement 15 
INPUT # statement 34 
INT function 24 
INX 105 
INY 106 

I/O guide 168-170 
l/Opinouts 168-170 
I/O ports 168-170 
I/O registers 190-191 

I/O statements see OPEN, CLOSE, INPUT # , PRINT # , 
GET# 

IRQ interrupts 139-147 

Joysticks 84-86 
JMP 104 
JSR 105 

KERNAL routines see memory map 
Keywords BASIC 159 

LDA 102 
LDX 103/b 
LDY 103/b 
LEFT$ 18 
LEN statement 1 9 
LET 11 
LIST 12 
LOAD 14 

LOAD from disk 89-90 
LOG 28 
LSR 119 

Machine language 93-148 
Mathematical formulae 27-28 
Memory maps 176-191 
M I D$ function 18 

MUSIC and SOUND SYNTHESIS 50-54 
Multicolour characters 61 -63b 
Multicolour sprites 74-79 
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NEW command 15 
NEXT 22 
NOP 104 
NOT 31 

Numeric variables 8-9 



ON GOTO 35-36 
ONGOSUB 35-36 
OPEN 31 

Operating system see kernal 
Operators logical see AND, OR, EOR 
ORA 1 1 1 



PEEK 38 

Peripherals 

PHA 109 

PHP 109 

Pinouts 

PLA 1 09 

PLP 110 

POKE 37-38 

Ports 168-170 

POS 29 

PRINT 10 

PRINT # 34 

Printer 86-88 

Program counter 95 

Program mode 1 1 

Programmable characters 55-63 



Random numbers 23 
READ statement 25 
Release (seeA/D/S/R) 52 
Register map CIAs 191 
Register map PRocessor 1 91 
Register map SID 190 
READ 25 
REM 19 
RESTORE key 
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Restore command 25 
RETURN statement 20 
RND 24 

RIGHT$ FUNction 18 
ROL 117-118 
ROMROM 
ROR 116-117 
RTI 116 
RTS 105 

RUN command 11-12 
RUN/STOP KEY 12 

SAVE command 13 
SBC 114-115 
SCREEN 16-17 
Screen memory 48,165 
SEC 115 
SED 115 
SEI 115 

Serial port 168-170 
SGN function 28 

SID chip see MUSIC & Sound Synthesis 

SID memory map 1 90 

SIN function 27 

SPC function 29 

Sprites 64-77 

Sprites Multicolour 74-77 

SQR 

STA 102-103 

Stack pointer 96 

Sprite collisions 72-74 

Sprite display priorities 72 

Sprite expansion 71 

Sprite positioning 68-70 

STATUS function 35 

STATUS register 95 

STEP 22 

STOP command 21 

STOP key (see RUN/STOP key) 
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String arrays see arrays 
STR$ function 19 
STX 103 
STY 103-104 

Subroutines see GOSUB/JSR 
Subtraction see SBC 
Sustain (seeA/D/S/R) 52 
SYS command 39-40 
System architecture 139-147 

TAB function 29 
TAN funciton 27 
TAX 1 04 
TAY 104 

THEN statement (see IF/THEN) 

Tl 24 

Tl$ 24 

TO statement 

TSX 110 

TXA 1 04 

TXS 110 

TYA 104 

User port see ports 
USR function 39-40 

VAL function 19 

VERIFY command 14 

Voices see MUSIC and sound synthesis 

Volume control 50 

WAIT statement 38-39 
Waveforem 52 

X index register 95 

Y index register 95 

Zero page 98 
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NOTES 



